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ELETTRICITÀ & ENERGIA è la grande opera del Gruppo 
Editoriale Jackson nata per tutti coloro che intendono ac- 
quisire la padronanza più completa delle fonti energetiche, 
dalle tecnologie utilizzate, fino alle principali applicazioni. 
Grande spazio è dedicato all'e/ettricità, dalle sue leggi 
fondamentali, fino ai suoi più comuni settori di utilizzo. 
L'elettricità è, infatti, tra tutte le risorse energetiche, quella, 
con cui chiunque di noi ha quotidianamente a che fare. 


Rivolta all'hobbista oltre che al tecnico, ELETTRICITÀ & 
ENERGIA riserva un buon numero di pagine, in ogni fasci- 


52 fascicoli da rilegare in: colo, anche a nozioni di tipo pratico, dall'impiantistica al 
didi I è “fai da te" elettrico. 
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E siamo già al secondo appuntamento. 
Forse più familiari; credibili nei nostri sforzi. 
E così, in questo numero, si riconfermano, insostitui- 
bili, i tutorial ai diversi linguaggi di Amiga: AmigaBa- 
sic, C, Assembly; e al CLI. E si ripresenta, sempre 
smagliante e sorprendente, Disco Magazine. 
Ma ci sono pure delle novità. Vi introduciamo a True 
Basic, un'implementazione del Basic che offre nuove 
possibilità ai cultori di questo linguaggio. E sempre in 
Basic c'è ROT, uno straordinario programma grafico 
che vi permette di progettare e muovere figure tridi- 
mensionali. 
E tra le altre cose, un interessante articolo sulla stam- 
pante Xerox 4020, le cui stampe già avete potuto am- 
mirare sulle pagine del primo numero della rivista e 
che continuerete ad ammirare anche in questo. Un 
modo insomma per presentarvi più da vicino questo 
nostro formidabile collaboratore. 
E poi c'è Forth. 
La sua presenza, è una precisa scelta in direzione di 
una informazione il più possibile completa sulle imple- 
mentazioni dei diversi linguaggi per Amiga. E qui ci 
fermiamo per alcune considerazioni. E mai possibile 
che non si possano rendere disponibili sul mercato 
italiano le molte implementazioni dei diversi linguaggi 
per Amiga, affermate ormai da tempo oltreoceano?! 
Queste difficoltà non solo intralciano il nostro lavoro, 
ma rischiano di rallentare la diffusione dell’ Amiga e lo 
sviluppo di software adeguato alle possibilità della 
macchina. E qui non si vuole solamente lamentare l'ir- 
reperibilità sul mercato ufficiale di validi prodotti come 
Multi-Forth della Creative Solutions e JForth della Delta 
Research, ma di implementazioni ormai quasi ' leg- 
gendarie ' di Lattice, Manx e Metacomco per esem- 
pio, per non parlare poi di tutti gli altri validi prodotti di 
cui molto spesso non si conosce nemmeno l'esistenza. 
Non potremmo a questo punto che esclamare anche 
noi: pirata e' bello?! 
Il nostro compito, infatti, è anche quello di penetrare 
in questo lato nascosto e oscuro dell'universo Amiga 
e farlo parlare: it's black. 
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Come aumentare la velocità dei programmi in AmigaBasic 
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( orso di Assembly 


Seconda puntata del corso di programmazione 
sul linguaggio Assembly MC68000 


GC orso di Basic dell’Amiga 


L’interprete Basic dell’Amiga 


E olinomi a tratti? Spline 
Dall’interpolazione alla computer graphics... 
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Finalmente uno standard per il Basic 
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Prowrite 


È stata introdotta di recente 
sul mercato una versione ag- 
giornata del ProWrite V2.0 con 
molte nuove configurazioni. Di 
particolare interesse è la possi- 
bilità di selezionare le specifica- 
zioni di default. Tutti i parame- 
tri di avvio come font, giustifi- 
cazioni, spaziatura e colori pos- 
sono essere predeterminati e 
vari file preference possono ve- 
nir immagazzinati e caricati in 
memoria all'occorrenza. 

Anche la memoria di lavoro 
riservata alla grafica e al testo è 
stata utilizzata al meglio, miglio- 
rando la velocità che ora è di 
dieci volte più rapida della ver- 
sione precedente di questo pro- 
gramma e nel modo testo tale 
velocità è veramente sorpren- 
dente. Le stampanti che preve- 
dono l'output in alta risoluzione 
permettono l'output di true letter 
quality da qualsiasi font di Amiga. 
Gli elaborati possono essere di 
qualsiasi larghezza utilizzando 
l'opzione del programma che 
permette la stampa su fogli di 
qualsiasi larghezza. 

| disegni HAM, tipo quelli crea- 
ti con DigiPaint, possono essere 
caricati all'interno del ProWrite e 
utilizzati. Il paragrafo riguardante 
le opzioni di formattazione del te- 
sto permette di inserire spazi in- 
teri o dimezzati, fissare l'altezza 
della linea e l'inclusione di linee 
vuote di separazione tra i vari pa- 
ragrafi. | paragrafi finali possono 
essere ordinati in modo ascen- 
dente o discendente per permet- 
tere la creazione di tabelle o per 
editare il dizionario che è com- 
preso nel programma. Tale di- 
zionario può verificare l'esatta 
grafia di 95.000 parole. Il con- 
teggio di caratteri, parole, frasi, 
paragrafi e di facile utilizzo riu- 
scendo così ad ottenere in modo 
semplice tutte le informazioni ri- 
guardanti il documento. Queste 
sono alcune delle principali mi- 
gliorie rispetto alla versione pre- 
cedente del programma, ma ce 
ne sono molte altre che contri- 
buiscono al potenziamento di 
questa versione. 

Il prodotto è fornito dalla New 
Horizons Software, P.O. Box 


43167, Austin, Texas, 78745, 
USA. 


Hard News 


Una nuova serie di sistemi 
hard disk compatibili per Amiga 
500 è stata immessa sul mer- 
cato statunitense dalla Supra 
Corporation. L'hard disk drive 
è disponibile con quattro diver- 
se capacità, con porta d'espan- 
sione SCSI e fornisce inoltre 
delle capacitàdi espansione 
della RAM. | quattro drive han- 
no una capacità di 20, 30, 60 
e 250 Mbyte e sono disponibili, 
rispettivamente al prezzo di 
$995, $1195, $1995, e $3995. 
| Supra Drive vanno inseriti di- 
rettamente nel socket d'espan- 
sione dell’Amiga 500 ed il tra- 
sferimento dei dati è molto ra- 
pido. RAM board di 1 o 2 Mbyte 
di capacità possono essere in- 
nestate nell'unitàdell'hard disk. 

Per maggiori informazioni 
contattate: Supra Corporation, 
1133 Commercial Way, Albany, 
OR 97321, USA. 


Accordo tra G.E. 


Jackson 
e VNU Business Press 


Il Gruppo Editoriale Jackson 
S.p.A., editore leader in Italia nel 
settore dell'elettronica, dell'infor- 
matica e delle nuove tecnologie, 
e la VNU Business Press Group, 
gruppo internazionale con sede 
ad Amsterdam e consociate ne- 
gli USA, Inghilterra, Francia, Spa- 
gna, Belgio e Australia, annun- 
ciano di aver concluso un accor- 
do che prevede l'ingresso del 
gruppo olandese nella compagi- 
ne azionaria del G.E. Jackson. 

L'accordo risponde in modo 
preciso alla struttura del merca- 
to delle tecnologie avanzate, il 
quale evidenzia la necessità di 
superare i confini nazionali. 
L'accordo prevede la diffusione 
tempestiva su scala internazio- 
nale dei nuovi media interattivi 
realizzati dalla Jackson, che 
vanta un'esperienza unica nel 
settore dei prodotti autodidattici 
basati su personal computer. 

Jackson e VNU svilupperan- 
no anche tutte le sinergie pos- 


sibili nell'area dei nuovi media 
video, telematici e ottici con 
particolare riferimento alle tec- 
nologie CD-ROM. 

La VNU è nota nel settore 
dell'editoria elettronica interna- 
zionale, oltre che per l'incorpo- 
razione dell'autorevole casa e- 
ditrice americana Hayden Pu- 
blishing Company (Electronic 
Design), anche per la recente 
acquisizione della prestigiosa ri- 
vista Electronics della McGraw- 
Hills. Nel settore dell'informati- 
ca la VNU pubblica testate di 
rinomanza mondiale quali l'a- 
mericana Personal Computing, 
le inglesi Personal Computer 
World e Computing, le francesi 
Informatique Hebdo e Soft & 
Micro e la spagnola Chip. 

Attualmente la Jackson pub- 
blica 28 riviste, oltre 800 ma- 
nuali tecnici e scolastici, 16 tra 
enciclopedie e corsi interattivi di 
autoapprendimento. 


Sim-Hi.Fi-Ives 
ventiduesima edizione 


La ventiduesima edizione del 
Salone Internazionale della Mu- 
sica e High Fidelity - Intern -*>. 
nal Video and Consumer Eie- 
ctronics Show si svolgerà nei 
Padiglioni 7, 12, 13, 14, 14B 
della Fiera di Milano dall'8 al 12 
settembre 1988. 

Il SIM-HI.FI-IVES di Milano 
rappresenta una delle principali 
manifestazioni specializzate del 
proprio settore e rappresenta 
una impagabile vetrina sulle an- 
ticipazioni e novità dei produt- 
tori oltre ad essere una gran- 
diosa occasione di animazione 
del mercato nazionale e inter- 
nazionale. 

La superficie prevista per 
questa edizione è di 35.000 me- 
tri quadrati. Sono previsti 300 
espositori diretti per un totale di 
oltre 800 ditte rappresentate. 

Dall'8 al 12 settembre il SIM- 
HI.FI-IVES sarà l'unica manife- 
stazione espositiva della Fiera 


‘ di Milano, perciò per quanto ri- 


guarda i parcheggi, i posti-letto, 
le prenotazioni aeree, Milano 
sarà a completa disposizione 
degli operatori specializzati pre- 
senti. 
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La rubrica "Corrispondenza" 
è stata voluta 
al fine di definire uno spazio, 
interno alla rivista, dedicato al confronto 
e al contributo di idee, provenienti 
dalla galassia dell'utenza Amiga. 
Per avervi accesso, 


inviate le vostre missive a: 


Spett. redazione 
"Amiga Magazine" 
rubrica "Corrispondenza" 
Gruppo Editoriale Jackson 
via Rosellini, 12 
20124 MILANO 
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Graphicraft e disegni di 
circuiti - 


Operando con il Graphicraft, 
ci si accorge ben presto che è 
possibile effettuare l'editing dei 
file Brush. Una volta editati tali 
file è possibile modificarli in sim- 
boli elettrici e registrarli su di- 
sco; questo fatto permetterà di 
vcreare disegni di circuiti elet- 
trici con una semplicità sorpren- 
dente. Il metodo più semplice 
per mantenere i pezzi con un 
certo ordine è è quello di di 
mantenere dei gruppi di parti 
simili (cavetti, resistenze, diodi, 
ecc.) sulla stessa palette brush. 
Spostarsi tra i file brush non è 
affatto difficile, ma fa perdere 
del tempo. Unico consiglio che 
crediamo utile fornirvi è: Dise- 
gnate i componenti orientati 
nelle quattro direzioni, in que- 
sto modo potrete sistemarli sui 
vostri disegni più facilmente. 
Questo metodo è meno espen- 
sivo di quello proposto da vari 
programmi commerciali ed ha 
un unico limite che è quello de- 
terminato dalla vostra immagi- 
nazione. 


Say 


Digitando il Comando SAY 
dal CLI si scoprono alcune in- 
teressanti configurazioni di que- 
sto comando. Appena digitato 
il comando SAY, apparirà sullo 
schermo una window che illu- 
strerà alcuni degli utilizzi di que- 
sto comando. Anche se gli e- 
sempi sono abbastanza vaghi, 
sono sufficienti per indirizzarci 
nella direzione giusta. Vi propo- 
niamo la sintassi del comando 
ed un esempio di come l’Amiga 
legge i file testo per voi: 

Sintassi: 

SAY-X (dir)/(filename[.ext]) 

Esempio: 

SAY-X S/startup-sequence 


È evidente che quanto pro- 
posto non servirà solamente 
per divertirsi nell'ascoltare la 
macchina mentre svolge que- 
sta funzione, ma piuttosto potrà 
essere utilizzato ogni volta che 
si desidera ascoltare un testo 
scritto in precedenza. 


Comandi AmigaDos 


Molti comandi dell'Amiga- 
Dos generano dei prompt pro- 
pri mentre attendono l'input. Ad 
esempio, il comando DATE? 
farà apparire il seguente prom- 
pt sullo schermo: TIME,DA- 
TE,TO = VERIK. È possibile 
però eliminare il comando 
prompt utilizzando l'operatore 
ridirezionale > e il device NIL. 
In questo modo DATE>NIL:? 
invierà il prompt al computer 
'nella terra di nessuno', questo, 
senza generare degli errori. As- 
sicuratevi solamente di posizio- 
nare l'operatore ridirezionale 
prima del parametro richiesto. 


Maggior spazio sui 
dischetti 


Un modo per ottenere mag- 
gior spazio sui dischetti, è quel- 
lo di cancellare i file che non 
interessano nella directory 
SYS:DEVS/PRINTERS. Se uti- 
lizzate uno dei printer driver for- 
niti dalla Preference, dovrete 
semplicemente cancellare gli 
altri che non utilizzerete. Per ot- 
tenere quanto appena propo- 
sto digitate quanto segue dal 
prompt del CLI: 


CD DEVS 

COPY PRINTERS/GENERIC 
TO SYS:TCD : 

DELETE SYS:DEVS/PRINTERS 
ALL CD DEVS 

MAKEDIR PRINTERS 

COPY SYS:T/GENERIC TO 
PRINTERS CD : 


È una buona idea comun- 
que, il richiedere un DIR DE- 
VS/PRINTERS prima di proce- 
dere con la cancellazione dei 
file printer, semplicemente per 
verificare come viene listata la 
vostra stampante. Non effettua- 
te quanto proposto sul disco o- 
riginale del Workbench, ricor- 
datevi che in un futuro anche 
non lontano potrete decidere di 
acquistare una nuova stampan- 
te! 


Modi testo e CLI 


Dal CLI è possibile abilitare i 
vari modi testo con poche e 


- sidererebbe. 


semplici pressioni di tasti. La 
sequenza per ottenere quanto 
detto è molto semplice: 

ESC[n1;n2;n8m 

dove ESC è la escape key, 
nt’ e' il numero dello stile, 'n2' 
e' il numero per il colore del 
primo piano, 'n3' è il colore del- 
lo sfondo e 'm’ e’ la sequenza 
terminator. Di seguito vi propo- 
niamo l'elenco dei valori che 
potete utilizzare, ma ricordatevi 
che se i colori sono stati modi- 
ficati per mezzo della Preferen- 
ce, questi numeri daranno risul- 
tati differenti. 


STILE 
0 
1 
3 


Testo Normale 
Grossetto 
Italico 

4 = Sottolineato 

7 Inverso 
PRIMO PIANO 

30 = Default 

31 = Bianco 

32 = colore complementario 
binario 

(colore di default è nero) 

33 = Rosso 
SFONDO 

40 = Default 

41 = Bianco 

42 = colore complementario 
binario 

43 = rosso 


È possibile naturalmente 
combinare tra loro i vari stili, 
immettendo ciascun numero di 
stile separato da un punto e vir- 
gola. Ad esempio: 


ESC|[1;33;41m 


che proporrà un grossetto in 
rosso su campo bianco; e 


ESC[1;3;4;31m 


che farà apparire le scritte in 
italico, grossetto, sottolineato e 
di colore bianco. 


Cambiare dischi con un 


singolo drive 


Quando si utilizza l’Amiga- 
DOS e un drive soltanto, le cose 
non sempre vanno come si de- 
Specialmente 
quando si deve rimpiazzare il 
disco Workbench nel drive per 
caricare un comando. Alcuni 
dei comandi dell’AmigaDOS 
vengono eseguiti non appena 
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caricati in memoria, non per- 
mettendo così di immettere il 
disco senza Workbench con cui 
si intende operare nel drive. U- 
tilizzando il comando CD que- 
sti non lavora perché, una volta 
caricato dal disco Workbench, 
viene eseguito istantaneamen- 
te. Un metodo per aggirare 
questo problema è il seguente: 
quando si imposta uno dei co- 
mandi ad esecuzione immedia- 
ta basterà aggiungere uno spa- 
zio e un punto di domanda pri- 
ma di premere il tasto Return, 
attivando in questo modo l'help 
on-line dell’AmigaDOS. Si ot- 
terrà in questo modo la sintassi 
ed il formato di ogni comando 
dell'AmigaDOS (per i princia- 
pianti questa è una procedura 
da ricordare) e carica in memo- 
ria il comando prima di eseguir- 
lo. Questa tecnica è valida per 
ogni comando dell'AmigaDOS 
anche se questi sono privi di 
parametri, come il comando IN- 
FO. Digitate semplicemente IN- 
FO? e vi apparirà il messaggio 
none: Inserite il disco del quale 
intendete avere delle informa- 
zioni e premete il tasto Return. 
Certamente la conoscenza di 
questa procedura semplifi- 
cherà i problemi per tutti coloro 
che sono in possesso di un dri- 
ve singolo. 


Deluxe Paint nascosti 
dall’area Undo 


Nel disegnare nelle aree del- 
lo schermo che sono normal. 
mente coperte dai menù a bar- 
re (in alto e sulla destra), non è 
possibile utilizzare l'opzione 
UNDO per correggere gli even- 
tuali errori commessi (probabil- 
mente perché riattivando il 
menù a barre viene considerato 
come il selezionare qualcosa di 
nuovo). Un modo per aggirare 
questo inconveniente è quello 
di utilizzare l'opzione Center Pi- 
cture. Si sposti semplicemente 
il cursore sulla destra o in alto 
sullo schermo e si prema il ta- 
sto 'N’, che effettuera' uno 
scroll automatico della figura, in 
questo modo le parti del dise- 
gno coperte dai menù verranno 
liberate. Ora potrete modificarle 
a vostro piacimento. 
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Multi preference 


Se il Preference è un ottimo 
tool per costruire gli ambienti 
Amiga, è comunque limitato dal 
fatto che è possibile registrare 
solamente un set di sistema di 
preference mentre se ne utilizza 
un altro. Coloro che utilizzano 
più di una stampante, o desi- 
derano un controllo più preciso 
del loro mouse per il disegno 
al posto del normale e rapido 
mouse utilizzato per spostarsi 
velocemente sullo schermo 
probabilmente sono interessati 
ad un modo automatico per 
spostarsi tra sistemi di preferen- 
ce specifici. Per dare una rispo- 
sta a questo tipo di problema, 
provate ad utilizzare i seguenti 
due comandiche troveranno 
posto nella vostra SYS:dire- 
ctory. Il primo file: 


file save-sys 
KEY name/a 


copy 
SYS:devs/system-configuration 
to 
SYS:devs/system<name> 
end of file 


Il secondo file: 


KEY name 
IF_EXISTS 
sys:devs/system-<name$normal> 
copy SYS:devs/system-<name 
$normal> to 
SYS:devs/system-configuration 
SYS:preferences 
ELSE 
ECHO ”SYS:devs/system<name 
$normal> 
not found...” 
ENDIF 
end of file 


La prima operazione da 
compiersi è EXECUTE SAVE- 
SYS NORMAL, che produce 
una copia dell’attuale configu- 
razione di sistema registrato. 
Questa dovrà essere la confi- 
gurazione che pesate di utiliz- 
zare più spesso. È possibile ef- 
fettuare il restore di questa con- 
figurazione per mezzo di EXE- 
CUTE RESTORE-SYS, senza 
dover aggiungere alcun argo- 
mento. Quando viene visualiz- 
zato lo schermo Preference, 
dovrete semplicemente preme 


re il pulsante (click) su LAST 
SAVED e USE. Si potrà effet- 
tuare un SAVE o RESTORE del. 
le altre configurazioni (es. per 
una seconda stampante) nel se- 
guente modo: 


EXECUTE SAVE-SYS PRINTER2 
EXECUTE RESTORE-SYS 
PRINTER2 (click LAST SAVED e 
USE) 


EXECUTE in S 


Se utilizzate sovente i file Exe- 
cute dell’AmigaDOS, sarete sor- 
presi di apprendere che un file 
Execute, posto all'interno della 
directory S sul Workbench, sarà 
comunque accessibile indipen- 
dentemente dalla directory in 
uso. Potrete spostare un file alla 
directory ‘Sequence’ per mezzo 
di COPY file TO S:. Troverete utile 
effettuare una seconda copia del 
comando Execute in modo ab- 
breviato. Ad esempio: COPY 
C:Execute to C:X. 


Spazi nei titoli Window 


Se possedete solamente il 
manuale Introduction to Amiga 
e vi siete preposti il compito di 
introdurre uno spazio nel titolo 
di una window è possibile che 
incappiate in parecchi errori pri- 
ma di approdare ad una solu- 
zione soddisfacente. Comun- 
que esiste un metodo per ag- 
girare l'ostacolo basterà utiliz- 
zare l'ALT e la barra spaziatrice 
(o CTRL-N se siete nel set di 
caratteri alternato). Tutto quello 
che dovrete fare sarà di man- 
tenere premuto il tasto ALT e 
nel frattempo premere la barra 
spaziatrice, e finalmente l’Ami- 
ga accetterà il comando. 


Ask per amiga 500 
e 2000 


Questo è un modo estrema- 
mente semplice per condizio- 
nare l'installamento di comandi 
CLI nella RAM disk e poi asse- 
gnar loro, gli appropriati volumi 
virtuali. Incluso nel disco Wor- 
kbench dell'’Amiga 500 e 2000 
c'è un comando chiamato ASK. 


Tale comando vi permette di 
effettuare un entry in un batch 
file (in questo caso, Startup-Se- 
quence) che invia un prompt 
all'utente per una risposta del 
tipo 'yes or no'. La sintassi per 
il comando ASK è: 


ASK “Any text question in 
QUOTES” 


Poi la risposta viene analiz- 
zata per mezzo di un comando 
IF WARN (WARN è vero se la 
prima lettera della risposta del- 
l'utente è ”"Y” o ”y”): 

IF WARN 

(operazione) 

ENDIF 

Eccovi un esempio per in- 
stallare la directory in C nella 
RAM: 


Echo ”” 
ASK ”Installo i comandi CLI 
nella RAM:Drive (Y o N)?” 
IF WARN 
MAKEDIR RAM:C 
COPY C: ALL RAM:C 
QUIET 
ASSIGN C: RAM:C 
ENDIF 


Poi prima della 
ENDCLI>NIL:, si 
quanto segue: 


linea 
immetta 


IF EXISTS RAM:C 
NEWCLI 


CON:540/150/100/50/CLI 
ENDIF 


Questo permette di decidere 
se operare solamente in am- 
biente Workbench o creare un 
CLI per utilizzarlo con questi co- 
mandi. Se i comandi sono stati 
copiati nella RAM: è certo che 
si vuole utilizzare un ambiente 
CLI, mentre l’effettuare un 
RAM:C presume che si voglia 
operare solamente con il Wor- 
kbench. L'unico neo nell’utiliz- 
zo della configurazione RAM:C 
è il rallentamento dell'operazio- 
ne di booting e la perdita di 
circa 199K di RAM. 
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Shanghai 
la concentrazione è spes 

so la chiave del successo! 

Nel corso dei secoli vari gio 
chi sono stati creati; ma solo 
migliori tra questi giochi hanno 
resistito al logorio del tempo e 
sono giunti sino a noi. Un fatto 
li accomuna, ed è che sono co- 
struiti su basi molto semplic 
ma per raggiungere il traguar 
do richiesto da ogni singolo gio 
co, le strategie da utilizzarsi so 
no spesso ncredibilmente 
complesse. Citando alcuni e 
sempi di questi giochi, potrem- 
mo ricordare gli Scacchi, la Da 
ma, il Go (oggi noto anche con 
il nome di Otello), ed infine 
giochi di carte (pensate sola 
mente a quante varianti Ci So- 
no). Shanghai è uno di quest 
giochi ed entra a pieno diritto 
nella lista dei Giochi Classic 

L'origine di questo gioco si tro- 
va in uno dei più antichi giochi 
del mondo e al tempo stesso più 
misteriosi. Si dice che risalga a 








25 secoli fa circa, ma di sicuro 
possiamo affermare che la sua 
patria è la Cina. Questo gioco 
prende il nome di Mah-Jong, agl 
inizi veniva giocato solo a corte 
o al massimo fra cerchie ristret- 
tissime di dignitari del Celeste Im- 
pero. Ha avuto nel tempo nume- 
rosissime derivazioni (Shanghai 
è una di queste), ed è uno dei 
giochi più diffusi nel mondo. Nel 
la sua patria d'origine viene con- 
siderato il gioco nazionale per ec 
cellenza 


r———tttt6@——EE 


LR UIICI 


VITI CET 
ISO CL 9A to play 


Colossal Adventure 1 


RACIIAA O STI t 
Dungeon Adventure 3 





Le 144 tessere di cui è com- 
posto il gioco sono, nella ver 
sione originale, fatte di osso O 
di bambù. Pescatori e marinai 
lo preferivano e lo preferiscono 
tuttora ad altri passatempi du 
rante le interminabili traversate 
oceaniche. La prima esporta- 
zione del gioco verso il Giap- 
pone (1905-1910) venne fatta 
da alcuni militari giapponesi 
Verso il 1920 alcuni marinai a- 
mericani importarono da Ma- 
cao negli Stati Uniti alcune con- 
fezioni di questo gioco. In Eu- 
ropa arrivò solamente nel 1922 





per mezzo di ambulanti cines 
espatriati in cerca di fortuna 
Shanghai è fornito di poche 
ma essenziali opzioni che do- 
vrete cercare di ricordare. ll gio 
co richiede l'utilizzo di un siste- 
ma che sia dotato di un minimo 
di 512K. Comunque, se il vo 
stro Amiga ha più di 512K ed 
è fornito di doppio drive, è pos 
sibile avere il Shanghai caricato 
simultaneamente con un se 
condo programma. Per giocare 
è richiesto l'utilizzo del mouse; 
la tastiera viene utilizzata per 
immettere il nome dei vincitori 
o per registrare una partita. Nel- 
la modalità Challenge (sfida tra 
due giocatori), sarà necessario 
l'inserimento di un secondo 
mouse nella porta due per ser 
vire simultaneamente i due con- 
tendenti. Questa opzione è mol 
to gradita da coloro a cui non 
piace spostare continuamente | 
controlli. Shanghai non deve il 
suo successo alla grafica, ma 
la grafica della versione dell'A- 
miga è superba. Quello che vi 
manterrà incollati al monitor 
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sarà però la strategia di questo 
gioco (prima di iniziare questo 
articolo abbiamo speso due po 
meriggi interi a provarlo!!!) 

Il gioco consiste nel togliere 
coppie identiche di pezzi dalla 
configurazione di 144 pedine po 
ste una sopra l'altra come dalla 
figura che vi apparirà sullo scher- 
mo. Questa piramide di pezzi 
prende il nome di Formazione 
Drago, dal momento che do 
vrebbe rappresentare un Drago 
dormiente, l’effetto tridimensio- 
nale è veramente efficace. | pezzi 
formano al centro una pila di cin- 
que tessere che decresce pro- 
GEESAATO verso l'esterno f 

o a raggiungere sui bordi delle 
pie formate da un pezzo soltan- 





o. Per distinguere i livelli da dove 
li togl ere | pezzi, le pe 
dine sono provviste d'ombra e 
sono in questo modo evidenzia 
te. Il livello più in alto proietta la 
sua ombra su quello immediata 
mente inferiore. Pare quasi che 
sia possibile toccare i diversi li 
velli. Lo sfondo su cui si st se ano 
le pedine è un velluto 
verde che offre al gioc co un a 
spetto cla o, come fosse gIo- 
cato su un tavolo ricoperto da un 
panno. Queste schermate graf 
che offrono l'opportunità di ap 
prezzare la potenzialità dell’Ami- 
ga 

| 144 pezzi, a forma di do- 
mino, sono divisi in vari grupp 
Esistono fondamentalmente 

e tipi diversi di pedine: quelle 


Legione 





numerali e quelle letterali. Le 
prime sono 104 e a loro volta 


SI suddividono in tre 
personaggi (0 


serie (0 


semi) Caratteri) 


AMIGA magazine 


cerchi e bambù (o canne). Ogni 
composto da 36 pezz 
una serie completa dall'uno al 
nove è ripetuta quattro volte 
(es. quattro 3 di bambù, quat- 
tro 9 di cerchi, quattro 1 di per- 
sonaggi, ecc.) 

Anche le rimanenti 40 pedine 
letterali si dividono a loro volta 
in varie serie: venti, draghi, fior 
e stagioni 

| venti sono in tutto sedici 
quattro per ogni punto cardinale 
principale. | draghi sono dodici 
quattro per serie (draghi ross 
verdi e bianchi). Gli ultimi otto 
pezzi saranno ripartiti in misura 


seme è 


uguale tra fiori e stagioni. | pezz 
sono disegnati fin nei minimi det 
agli in maniera impeccabile. Le 


pedine numerali oltre al disegno 
hanno sulla parte superiore a de- 
stra il numero corrispondente in 
cifre arabe. | Draghi, i Venti, le 
Stagioni, ecc., possono essere 
considerati gli equvalenti dei Re 
Regine e Fanti che si trovano ne 
gioco delle carte. Se consideria- 
mo la longevità del Mah-Jong 
potremmo azzardare che i gioch 
occidentali di carte, sviluppatisi in 
epoche più recenti, abbiano a- 
vuto come antenato proprio Que 
sto gioco 
Per vincere non dovrete far al 
tro che accoppiare ciascuna pe 
dina con la sua gemella e rimuo- 
vere la coppia dal tavolo; il tutto 
dovrà essere effettuato in accor 
do con le regole del gioco e cioè 
che | pezzi da rimuovere dovran 
no essere ‘liberi’ (non dovranno 
esserci pedine a destra o a sin 
stra sullo stesso livello del pezzo 


che si intende rimuovere). Detto 











così, il gioco sembra facile... ma 
vi ricrederete immediatamente 
già dalla prima partita!!! 

Il gioco è provvisto di opzion 
per aiutarvi a rintracciare le pe 
dine da accopiare, per Indicarv 
le mosse che vi rimangono, ma 
se intendete giocare In maniera 
pulita’, dovrete rifiutarvi di uti 
lizzare queste opzioni (noi lo ab 
biamo provato almeno una cin 
quantina di volte, ma non ab 
biamo mai vinto!) 

Ci sono vari modi per giocare 
a Shanghai: Solitario, Torneo, Sfi 
da e Team Effort. Ciascuna mo 
dalità presenta lo stesso livello d 
difficoltà, sono variabili solo il nu 
mero dei giocatori ed il tempo 
‘Solitario’ (Solitaire), è la versione 
Pe un solo giocatore; in questa 

)dalità non sono I lel 
mitazioni di tempo giocatore 
rà solamente togliere dalla 
configurazione del drago dor 
miente il maggior numero di pe 
dine > POSSIoA per vincere natur 
amente si dovranno togliere tutte 
e pedine. Nella versione Solita 
rio è possibile registrare una par 








present 








tita e richiamarla in memoria in 
un secondo momento 

Nel modo 'Torneo' (Tourna 
ment), è possibile inserire un 
numero variabile di giocator 
Ciascun giocatore, toglierà de 
e pedine da un'identica scac 
chiera. E possibile scegliere de 
tempi limite per torneo di: cin 
que, dieci, e venti minuti oppu 
re si può scegliere di giocare 
senza limite di tempo. Il gioca 
tore che è capace di togliere Il 
maggior num vince 
| torneo. | cinque punteggi 1 
gliori saranno registrati automa 
tivamente su disco 

La modalità 'Team Effort' è 
denti a ‘Solitario’, unica dif- 
ferenza è che possono collabo 
rare vari giocatori. Ciascun 
nembro del gruppo ha la pos 
sibilità di effettuare una mossa, 
è necessaria perciò la massima 
collaborazione per TAGGIA ngere 

successo. La partita terminerà 
quando uno dei gruppi vince o 
quando non saranno possibil 
mosse ulterior 

Sfida' (Challenge), è una ga- 


r in ’ 
ero di pezz 
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ra tra due contendenti per ve- 
dere quale dei due effettua il 
maggior numero di mosse. In 
questa modalità la strategia del 
gioco è di vitale importanza dal 
momento che ciascun giocato- 
re ha un tempo limitato per ef- 
fituare la sua mossa. | limiti di 
tempo per ciascun turno pos- 
sono essere di 60, 30, 20, o 10 
secondi. Il gioco finisce quando 
ciascun giocatore non toglie al- 
cuna pedina dal gioco per due 
turni consecutivi. 

Personalmente ho giocato 
con la versione Solitario’ molte 
volte in più che con le altre ver- 
sioni, ciò è dovuto principalmen- 
te al fatto che non c’era nessun 
malcapitato nei dintorni quando 
giocavo a Shanghai. Il gioco ri- 
sulta stimolante e normalmente 
giocavo tre o quattro partite alla 
volta che mi impegnavano per 
un paio d'ore circa. Ma il tempo 
passava velocemente tanto ero 
assorbito dal gioco. Una volta 
che avete sviluppato una strate- 
gia che reputate vincente è il mo- 
mento di passare alla modalità 
"Sfida' in modo da sottoporre a 
verifica la vostra teoria e velocità. 
E quasi impossibile vincere se 
settate iltempo per effettuare una 
mossa a dieci secondi, ma dopo 
un po' questo fatto aumenterà di 
molto la vostra capacità attentiva 
e giocando nelle altre modalità 
otterrete risultati più che confor- 
tanti. 

Di grande competitività risul- 
tano le modalità 'Sfida e Team 
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Effort', questo grazie anche alle 
limitazioni relative al tempo che 
vi si possono inserire. Ricorda- 
tevi però che nel modo 'Sfida' 
non si può ricorrere alle opzioni 
di aiuto se ci si trova nei pastic- 
ci. Se invece, pensate di essere 
dei discreti giocatori, "Team Ef- 
fort’ sarà il vostro palcoscenico 
nelle serate con gli amici. 
Abbiamo rilevato solamente 
un piccolo neo in questo pro- 
gramma. Quando non ci sono 
più mosse a disposizione, il fatto 
non viene segnalato in alcun mo- 
do. Comunque premendo l’o- 
pzione HELP si scopre se riman- 
gono ulteriori mosse. Si rischia di 
guardare lo schermo per una de- 
cina di minuti alla ricerca di ulte- 
riori mosse a disposizione, men- 
tre queste non esistono. Se da un 
lato questo fatto è frustrante, dal- 
l'altro offre un ulteriore grado di 
realisticità al programma. La 
chiave del successo in questo 
gioco è certamente la concen- 
trazione, senza questa è pratica- 
mente impossibile ideare e man- 
tenere una strategia vincente. 
Vi ricordiamo che il Shanghai 
è sprovvisto dell'opzione HELP 
per farvi... smettere di giocare. 


Silicon Dreams 
e Jewels of Darkness 


Ovvero un pizzico di nostal- 
gia. 

Molto tempo fa — prima che 
la IBM realizzasse che i com- 
puter potessero sedersi in cat- 


fa 
fia 


+ 


tedra e che i mouse potessero 
apprendere le arti del disegno, 
nel tempo in cui si poteva e- 
sprimere la memoria di un com- 
puter con un numero di due ci- 
fre e il numero dei colori veniva 
espresso con una cifra soltanto 
— apparve il primo adventure 
fornito di testo e grafica. 
Giochi del tipo Wizard and 
the Princess e Blade of Black 
Poole, di compagnie tipo A- 
dventure International e Sierra 
On-Line, utilizzavano degli ana- 
lizzatori sintattici molto semplici, 
e la grafica veniva realizzata 
con immagini statiche, normal. 
mente sui due terzi superiori 
dello schermo. Per gli standard 
a cui siamo abituati, la grafica 
e l’analisi sintattica di quei gio- 
chi sono molto al di sotto della 
norma. Ma questo accadeva 
molto tempo fa e come disse 
una volta qualcuno, “L'unico 
fatto costante nell'industria dei 
computer è il cambiamento. ” 
Ora la Firebird Software 
(Rainbird in Inghilterra) ha ripre- 
so i testi e la grafica classica 
degli adventure, introducendo 
due nuovi programmi per l'A- 
miga: Silicon Dreams e Jewels 
of Darkness. Il primo è una tri- 
logia d'avventura di Science Fi- 
ction (fantascienza) che è am- 
bientata su un mondo chiamato 
Eden, mentre Jewels of Dar- 
kness è una trilogia di avven- 
ture fantastiche del tipo cappa 
e spada ambientate su un mon- 
do chiamato Valali. Le avven- 





ture non sono strettamente col- 
legate tra loro, si può così gio- 
carne una alla volta e in qual- 
siasi ordine considerandole co- 
me giochi separati. Sono co- 
munque più piacevoli se 
giocate nell'ordine in cui sono 
presentate dagli autori. C'è la 
possibilità di ottenere il titolo di 
"Supremo Avventurierò se ri- 
portate il vostro punteggio da 
un gioco a quello seguente. 

Il gioco ricalca le avventure 
di Kim Kimberly. Nella prima 
parte, ‘’Snowball”, voi (nelle 
vesti di Kim) siete stati risvegliati 
anzitempo dal vostro stato di 
ibernazione. Siete a bordo della 
Snowball 9, un'astronave di co- 
loni inviata verso un pianeta 
chiamato Eden. Qualcuno sta 
sabotando la navicella, e il com- 
puter di bordo pensa che l’u- 
nico in grado di intervenire con 
successo siate voi. Se riuscirete 
nell'intento, avrete vinto. Poi si 
passa alla seconda parte, 
"Return to Eden”, inizia con la 
ciurma della Snowball 9 che si 
è appena destata e vi sta ac- 
cusando di tradimento; un na- 
stro danneggiato nella sala di 
controllo sembra dimostrare 
che avete cercato di far esplo- 
dere l'astronave. 

L'episodio finale della trilogia 
è “Worm in Paradise”, per at- 
tivare quest'ultima parte dovre- 
te essere stati molto abili in quel- 
la precedente e comunque ci 
vorrà un po' di tempo per rag- 
giungerla. Ora siete diventati 
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una specie di leggenda, la vo- 
stra figura ha assunto propor- 
zioni mitiche. 

Jewels of Darkness inizia con 
“Colossal Adventure, il classico 
testo d'adventure. Dovrete trova- 
re ed esplorare le Colossal Ca- 
verns, poi dovrete immagazzina- 
re il tesoro che avrete trovato nel- 
le caverne in una piccola capan- 
na situata esattamente nelle vici- 
nanze della partenza del gioco. 
Terminata questa prima parte vi 
ritroverete in ‘Adventure Quest”, 
qui dovrete trovare e distruggere 
il cattivo Lord Demon Agaliarept. 
La terza parte del gioco, 
“Dungeon Adventure”, inizia 
immediatamente dopo che avre- 
te assolto al compito precedente, 
e dovrete esplorare i domini di 
Lord Demon alla ricerca del te- 
soro, di magia e di avventura. 

La parte grafica di Silicon 
Dreams non mi è familiare, ma 
il primo tracciato di Jewels of 
Darkness lo è certamente, dal 
momento che è una variante 
dell'adventure originale. Que- 
sto programma (l'originale, non 
la versione Rainbird) fa parte 
del software di pubblico domi- 
nio (naturalmente privo di dise- 
gni). Sono stati aggiunti alcuni 
comandi in modo da migliorare 
quest'ultima versione. Indub- 


biamente ci sono molte perso- 
ne che non giocano con com- 
puter game da molto tempo e 
che perciò non hanno mai vi- 
sto prima questi classici. Sono 
dei giochi divertenti e la loro 


importanza storica li rende 
maggiormente appetibili. 

| giochi sono valutabili in mo- 
do positivo almeno per alcune 
ragioni. Mappe e descrizioni 
scritte sono abbastanza ben fat- 
te, e con il costo di un gioco ne 
acquistate in realtà tre. Questi 
(accanto agli aspetti storico-no- 
stalgici), sono tutte le parti va- 
lutabili positivamente. Il punto 
debole è la grafica, fatto que- 
sto abbastanza sorprendente, 
dal momento che la Rainbird 
utilizza dell'ottima grafica in al- 
tri adventure da loro prodotti, 
ad esempio: The Pawn. Ma ad 
un'analisi più accurata ci si ac- 
corge che The Pawn è stato 
creato da un altro gruppo di 
persone, e forse questo fatto 
può spiegare la differenza. 

Comunque, i giochi sono ac- 
cattivanti e le storie interessanti. 
AI giorno d'oggi i possessori di 
computer, ed in modo speciale 
coloro che hanno un Amiga, so- 
no abituati ad una grafica che 
utilizza un minimo di otto colori 
(in questo caso ne attendeva- 
mo almeno il doppio). Siamo 
oramai talmente abituati a ve- 
dere dei giochi che utilizzino 
un'ottima grafica che questi 
giochi rischiano di deludere più 
di una persona. C'è stato un 
tempo in cui questi giochi erano 
il meglio che il mondo dei com- 
puter potessero offrire! 

Il sistema vi permette di spe- 
gnere le figure per mezzo di 
una selezione da menù. L'ana- 


lizzatore sintattico è abbastanza 
primitivo, anche se le descrizio- 
ni in certe parti sono gradevoli 
e stanno a significare che la sin- 
tassi è stata ampliata (Ramsave 
e OOPS!, a nostro avviso sono 
le nuove configurazioni più utili) 
. Ma questo non è ancora ab- 
bastanza per stimolare le aspet- 
tative dei giocatori. | giochi han- 
no un bisogno primario di es- 
sere sostenuti da una ottima 
grafica, e la grafica in questo 
caso non è in grado a tratti di 
sostenere nemmeno se stessa. 
La Rainbird va comunque cita- 
ta in senso positivo per un fatto: 
sul retro della confezione (la 
quale ci appare come un con- 
tenitore per videocassette) è 
raffigurato un disegno tratto dal 
gioco. Il disegno non è stato 
modificato in alcun modo e ap- 
pare sulla confezione come ap- 
pare sullo schermo. La software 
house non ha in alcun modo 
cercato di celare o di fornire 
una falsa impressione del gio- 
co. Dal momento che il mercato 
spesso non corre sui binari del- 
l'onestà, dobbiamo dare credi. 
to di ciò alla Rainbird. 

E dobbiamo sottolineare an- 
che l'utilità delle nuove configu- 
razioni di Ramsave e OOPS! E 
utile poter registrare velocemen- 
te nella RAM la vostra attuale po- 
sizione di gioco, vi libera anche 
dalla cpia dello schema di pro- 
tezione. Il tuttovene attivato quan- 
do si cerca di effettuare il restore 
da un disk-based registrato. 


Questo fatto può risultare noioso 
quando si effettuano varie ope- 
razioni di restore e Ramsave ri- 
sulta molto utile per questo tipo 
di situazioni. 

OOPS! è ugualmente utile 
perché vi permette di ritornare 
alla mossa precedente. In que- 
sto modo potete esplorare mol- 
to facilmente i luoghi più diffi- 
cili. È senza dubbio un'ottima 
configurazione e spero che an- 
che altre compagnie cerchino 
di implementarla nei testi dei lo- 
ro adventure. Ci sono vari punti 
di valore in questi giochi. | gio- 
catori che non sono interessati 
alla grafica, o che trovino que- 
ste storie interessanti, apprez- 
zeranno questi giochi a basso 
prezzo. Certamente i giocatori 
più smaliziati non saranno sor- 
presi dalle modalità dei giochi 
e dalle strutture di programma- 
zione utilizzate in questa occa- 
sione; tali giochi possono co- 
munque essere considerati co- 
me un ottimo terreno di allena- 
mento per coloro che hanno 
appena iniziato la loro carriera 
con gli adventure. Un'ultima co- 
sa mi preme sottolineare e cioè 
di non aspettarsi della grafica 
simile a quella che si può ritro- 
vare in The Pawn, aspettatevi 
invece di essere riportati ai tem- 
pi in cui l'industria dei compu- 
ter era giovane, e quattro co- 
lori erano veramente il massi- 
mo. 
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di Massimo Lavarian 
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a stampa più nitida 
immagini grafiche 
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Per coloro che sentono la necessità di 
sviluppare graficamente i loro elaborati, e 
per quelli che esprimono meglio il loro la- 
voro con più colori, ad esempio per stam- 
pa su fogli di acetato (i lucidi utilizzati poi 
per proiezioni su lavagne luminose), par- 
leremo di quelle stampanti che meglio sod- 
disfano tali esigenze. Nella famiglia delle 
stampanti, infatti, considereremo quelle a 
getto d' inchiostro ed in particolare la XE- 
ROX 4020, un prodotto di qualità i cui ri- 
sultati sono veramente ottimi, anche se il 
prezzo la fa ritenere un frutto ancora proi- 
bito, pur essendo il rapporto prezzo/qualità 
uno dei migliori per questo tipo di stam- 
panti. 


Stampanti a getto d’inchiostro 


La scrittura con tale tipo di macchina 
viene realizzata mediante un flusso di pic- 
cole gocce che viene proiettato contro car- 
ta di tipo comune, meglio se rispondente 
ai consigli della Casa Costruttrice. Nel caso 
del getto continuo, l'inchiostro viene invia- 
to a pressione costante in un serbatoio con 
un ugello. Per interrompere il flusso di u- 
scita e generare un insieme di gocce e- 
quidistanti, viene utilizzato un cristallo pie- 
zoelettrico (nel caso della Xerox 4020, il 
cristallo piezolelettrico viene regolato da 
un circuito elettronico controllato da un 
microprocessore) che realizza vibrazioni 
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ad alta frequenza. Queste gocce riescono 
a formare il carattere per mezzo di un op- 
portuno caricamento elettrostatico gover- 
nato dalla logica della macchina a partire 
dalla matrice dei punti d'inchiostro che lo 
formano che influisce sulla direzione finale 
del singolo soggetto. Le gocce non de- 
viate dal campo elettrico fisso, che devono 
attraversare per arrivare alla carta, vengo- 
no raccolte, filtrate e rimesse in circolazio- 
ne. 

La scrittura del carattere viene eseguita 
verticalmente e con spostamenti della te- 
stina lungo la linea di stampa. Alcuni mo- 
delli possono essere dotati di più ugelli in 
linea per ottenere prestazioni migliori, co- 
me nel caso della Stampante XEROX 4020 
con la quale la tecnologia ci presenta una 
serie di soluzioni innovative ed interessanti 
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Caratteristiche principali 
della stampante 


La stampante XEROX 4020 è una tra le 
più versatili e veloci fra quelle a getto d'in- 
chiostro. Le sue caratteristiche la rendono, 
però, più adatta ad applicazioni con stru- 
menti grafici, o per complesse stampe di 
elaborati CAD o CAM e via via crescendo 
per l'image processing ai vari livelli (vedasi 
tabellina accanto),che non per applicazio- 
nì di pura e semplice stampa. 


Questo modello, in Draft mode (emis- 
sioni di tabulati o bozze di stampa) è in- 
fatti in grado di 40 battute al secondo u- 
sando i suoi 4 colori, mentre arriva a 80 
battute al secondo se si usa solo l'inchio- 
stro nero, prestazioni in tal senso molto 


modeste; in modo standard disegna una 
pagina in due minuti. 


Esso dispone di quattro cartucce d'in- 
chiostro (nero, blù, magenta, giallo) e 
stampa in 7 colori diversi e nelle varie 
combinazioni di questi e può raggiungere 
un'ottima definizione nella stampa di qua- 
lità disponendo di una matrice di 120x120 
punti per pollice quadro in draft mode e 
240x120 punti in NLQ (near Letter Qua- 
lity). 

Dotata di una testina che presenta 20 
ugelli (otto per il nero e quattro per ogni 
colore base), la XEROX 4020 stampa 
spruzzando sulla carta minuscoli punti 
d'inchiostro che, sovrapponendosi, crea- 
no caratteri pieni e netti con risultati di 
buona qualità. Il buffer di 8 Kbyte consente 
una certa autonomia dal computer, e per- 
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CRISTALLO 
PIEZOELETTRICO 


Schema di 
funzionamento. 


mette di sincronizzare meglio le diverse 
velocità di produzione e stampa dei dati. 
Dispone di un insieme completo di 96 ca- 
ratteri standard ASCII. 

Il pannello di controllo, ridotto all'essen- 
ziale, si trova sul lato anteriore, alla destra 
dell'operatore e consente poche ma fon- 
damentali operazioni. Oltre alla lucetta di 
accensione e di "pronto stampa” e dei 
soliti tasti di comando per l'avanzamento 
della carta, presenta quattro led, ognuno 
riservato a segnalare l'esaurimento di un 
colore, ed uno per l’ eventuale assenza di 
carta. 


Componentistica 
Tolto l'involucro, l'interno della macchi- 


na ci rivela un mondo disposto in maniera 
molto ben ordinata di cui ora vedremo, per 
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PIATTI 
DI DEFLESSIONE 


TESTINA 
DI SCRITTURA 


sommi capi, la posizione, la funzione e 
l'uso. Possiamo distinguere due parti: una 
meccanica composta da numerosi tubicini 
e da pompe che rappresentano il braccio 
della macchina ed una elettronica, la men- 
te, posta su una scheda in cui spicca il 
processore... e trovano posto pure il dri- 
ver dei motori e la ROM del generatore di 
caratteri. 

Circa la sua composizione interna rite- 
niamo non ci sia altro da aggiungere se 
non che tutte queste componenti siano 
disposte in maniera essenziale e razionale, 
canone fondamentale di una buona pro- 
gettazione a tutto vantaggio dell’affidabi- 
lità e del costo finale della macchina. 

La maggior parte delle operazioni di 
manutenzione che riguardano la macchina 
sono lasciate ad uno speciale liquido con- 





tenuto in una cartuccia di facile uso posta 
nella parte inferiore e fornita dalla ditta co- 
struttrice. Sempre da essa vengono fornite 
le cartucce contenenti l'inchiostro per la 
stampa. Simpatico e molto comodo è il 
metodo di caricamento delle vaschette 
d'inchiostro: ogni vaschetta presenta una 
scanalatura ad incastro per la sua speci- 
fica cartuccia, questo onde evitare il cari- 
camento della vaschetta con una cartuc- 
cia di colore diverso. L' esaurimento del- 
l'inchiostro viene segnalato da una spia 
luminosa (una per ogni colore) posta sulla 
parte superiore dell'involucro della stam- 
pante. 

Una volta predisposta la macchina alla 
scrittura si può effettuare un test di stampa 
che ci da la verifica dell'intensità e della 
regolazione dei colori, della grossezza e 
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della chiarezza dei caratteri, tutto questo 
operando sul tasto "TEST SWITCH" po 
presenza di sbavature € 


sto sul retro 
altri difetti nella stampa si può intervenire 


‘RECOVERY SWITCH", posto v 
nte. Questo he auto 
solori con un ciclo che dura 





sul tasto 
cino al prece 
maticamente 






Particolare 
delle vaschette 
dei colori. 


Comandi 
della stampante. 








Connettori posti 
sul retro. 
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Digitalizzazione 
in H.A.M. stampata 
con la Xerox 4020. 


Set di carte 
e colori. 


zirca quattro minuti, compiendo delle pro 
cane di asportazione dell’ inchiostro sec 
co dagli ugelli della testina e rimuovendo 
eventuali presenze d' aria dal sistema. Ad 
ogni modo la regolazione può essere ef 
fettuata pure manualmente intervenendo 
sugli opportuni Switch 

Ad ogni modo questi interventi si ren 
dono necessari solamente ogni qualvolta 
si aggiunge l'inchiostro nella vaschetta; in- 
fatti la testina, onde evitare problemi legat 
all'essicamento dell'inchiostro, si posizio- 
na, a stampa ferma, in corrispondenza di 
un cuscinetto che la mantiene ben chiusa 
e pronta all'uso dopo essere rimasta inat 
tiva anche per un lungo periodo. 


La presenza di un interfaccia parallela 
Centronics a 8 bit fa si che sia compati- 
bile con i principali sistemi di home com 
puter; è disponibile pure la possibilità d'in 
terfacciamento con la porta seriale RS- 
232-C 


Il meccanismo di trascinamento della 
carta è la frizione, il che consente di usarne 
di qualsiasi tipo nei limiti imposti dalla lar- 
ghezza del carrello e che raggiunga al 
massimo 228 mm per riga; è possibile an- 
che optare per |’ alimentatore per fogli 
singoli o per il trattore. Perché non si ve- 
rifichi l' incoveniente dell'assorbimento del 
colore da parte della carta con conseguen- 
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ti possibili sbavature e soprattutto una no- 
tevole diminuzione dell'intensità del colore 
è consigliabile l'uso di una carta speciale 
distribuita dalla stessa Xerox. 


Conclusioni 
La stampante XEROX 4020 per le ca- 


ratteristiche sopra riportate si è dimostrata 
un ottimo strumento producendo docu- 


Amiga 2000 visto dalla Xerox 4020. 


IMMA 


iN 


i 


menti di qualità. Affiancandola ad un Per- 
sonal Computer AMIGA 2000 si è dimo- 
strata all' altezza della situazione dando il 
dovuto risalto alle produzioni grafiche di 
quest’ultimo ed a disegni di qualsiasi tipo. 
Oltre alle caratteristiche sopracitate non 
sono state trascurate altre migliorie quali 
ad esempio la silenziosità (il rumore è in- 
feriore a 55 Db) per cui non impone par- 
ticolari limiti nella collocazione. 


La stampante Xerox 4020 ci 
è stata gentilmente prestata 
dalla "Informatica Italia”, Cor- 


so Re Umberto 128 Torino tel. 
501647, che ne gestisce la di- 
stribuzione. 








Settembre 1988 


mica WORKSTATION GRAFICHE +/vrca 


VIDEOREGISTRATORE 


TELECAMERA B/N 
750 LINEE - 15 LUX 


STATIVO 
PROFESSIONALE 
A 4 LAMPADE 


5 


DIGITALIZZATORE 
TEMPO REALE 


AMIGA 2000-2FDD 880K 3"1/2 
ESPANSIONE 2MB INTERNA 
HARD DISK 20/40MB SU SCHEDA 

SCHEDA 68020 + 68881 





O “SP 
S 
TAVOLETTA GRAFICA — SCANNER BIN 
TELECAMERA BIN KURTA ISONE A PIANO FISSO 


750 LINEE - 15 LUX FORMATI AZ/A4 


RISOL 1000 PPI 


HARDWARE 

AMIGA 800. ..........circsrrviciin E er 930.000 
AMIGA 500 + Monitor 1084 .. a 

AMIGA 2000 senza monitor .. 
AMIGA 2000 2 drive 3"1/2 ........... a 
ESPANSIONE 512K interna A500 ................... Telef. 
ESPANSIONE 1MB esterna A1000 . : 
ESPANSIONE 2MB esterna A500/A1 
ESPANSIONE 2MB interna A2000 .. 
DISK DRIVE 3"1/2 esterno A500/A1 
DISK DRIVE 3”1/2 interno A2000 .... 



















HARD CARD 20MB SCSI A2000 ..... 1.250.000 
HARD CARD 20MB 20MB SCSI A2000 ..750.000 
HARD CARD 40MB MS-DOS A2000 ............ 950.000 
Sistema a Cartridge da 12MB removibili della Kodak + 
5 Cartridge (60 MB i srresa ero ce 2.950.000 
SCHEDA JANUS XT A2000 . È 
SCHEDA JANUS AT A2000 550. 
KIT SOSTITUZIONE MOTOROLA 68010 ....... 99.000 
SCHEDA 68020 + 68881 16MHZ .............. 1.850.000 
AMIGA-EYE A500/A1000/A2000 . 100.130.000 
VD AMIGA FRAMEGRABBER ..................... 750.000 
VD 2000 DIGITALIZZATORE COLORE IN SvoSa 
A500/A1000/A2000 ................................. 00 
TELECAMERA SECURIT T-979 
SOFTWARE ORIGINALE: 
INFINITY SOFTWARE: NA ostina ASSO 
SCENERY DISK 7. 39.000 
ZUMA: 
TV SHOW ...................... 129.000 
GOLD DISK: 
PROFESSIONAL PAGE 
aio) 








ACTIVISION: 
MOEBIUS........... HACKER lIl................--... 29.500 
ULTIMA Il... 49.000 THE ART OF CHESS ....29.500 
MICROMAGIC: SHANGHAI .................... 29.500 
BORROWAD TIME ........ 65.000 
LITTLE COMPUTER PEOPLE 
verme secsamsenesnescresiamencicnezzennee DEMO 
MINDOSHDOW. se 95.000 





TASS TIMES ................. 





MINDSCAPE: 
DEFENDER OF THE CROWN 


sentiti e A DOO 
HALLEY PROJECT ........ 69.000 





DEJA:VÙ rina 69.000 

UNINVITED..................-. = 69.000 

NEWTEK: 

DIGI-PAINT....................... 79.000 

OXXY INC: 

MAXIPLAN 500 ........... -. 190.000 

MAXIPLAN PLUS. ...... .250.000 

PSYGNOSIS: 

BARBARIAN ..... 

OBLITERATOR 

SUBLOGIC: SCULPT 3D ..... — 129. 
FLIGHT SIMULATOR......75.000 ANIMATE 30 ................ 199.000 


PIX COMPUTER S.R.L 
VIA F. D'OVIDIO, 6C 
TEL 06/8293507-825731 
o» 00137 ROMA 

dg). COMPUTER&CO. 
c ST. P.1vA08309630883 


PAGESETTER ITAL... 210.000 


PORTAL ememezencnzno, BELOOO 
GEE BEE AIR RALLY ....55.000 
AEGIS: 





STATIVO PROFESSIONALE 4 LAMPADE ...350.000 
AMIGA SOUND A500/A1000/A2000 ............ 150.000 
INTERFACCIA MIDI A500/A1000/A2000 
SALE PROFESSIONALE 


PENMOUSE (6° x 3" 200 Do) SR I 
SERIE IS 8,5° x 11" 1000 PPI ..... - 
SERIE IS 12" x 12" 1000 PPI .. 
SERIE IS 12" x 17" 1000 PPI ... 
PENNA A DUE RITO =$ 


IOTTON 
co Li AE PER AMIGA . 


STAM 

PANASONIO KX-P1081 80 COL 120 CPS .... 
NEC P2200 80 COL 216 CPS 24 AGHI . 
NEC P6 80 COL 216 CPS 24 AGHI .... 
NEC P6 KIT COLORE_....................... 
NEC P7 136 COL 216 CPS 24 AGHI . 
NEC P7 136 COL 216 CPS 24 AGHI . 
CITIZEN HQP40-24 AGHI .............. 
CITIZEN HOP40-KIT COLORE _. 
XEROX 4020 INK JET COLORE . 
OKI LASER LL6 PPM... 

LASER QMS LPSB4POSTSCRIPT . 
HARD COPIER SHINKO ................. e 
POLAROID PALETTE. PER AMIGA ............3. 












COMMODORE: 
MIND WALKER ............69.000 RETURN TO ATLANTIS 
TEXTCRAFT PLUS ...... 145.000. ....mmomemenmen eee: 98000 
SUPERBASE PERSONAL PROGRESSIVE P. &S: 
ctr 1000001 FUMATA tt. 94.000 
LOGISTIX .. 120.000  MASTERTRONIC 
DISCOVER) 
ARKANOID....... 
EPYX: 
DESTROYER .. 
WINTER GAMES 
WORLD GAMES 
NEW HORIZONS: 
PROWAITE ......... È 
NORTHEASTERN SOFT DARK CASTLE......... - 49.000 
PUBLISHER PLUS ...... 129.000 
RIGHT ANSWER GROUP: 
THE DIRECTOR ...........89.000 
METACOMCO: 
MCC PASCAL .......... 139.000 
ASSEMBLER LANGUAGE 
prato Sese li:.130/000 
EAGLE SOFTWARE: 
BUTCHER 2.0 ........... _.49.000 
ELECTRONICS ARTS: 
ADVENTURE C. SET ....38.000 
ARTIC FOX ..........-29.500 
BARD'S TALE 1... 29.500 
CHESSMASTER 2000 ..29.500 
INSTANT MUSIC ........... 33.000 
MARBLE MADNESS .....29.500 
SKYFOX ...... 
TESTDANE... 
DE LUXE MUSIC . 
DE LUXE PAINT ll ....... 99.000 
DE LUX PRINT .... .000 FOOTBALL FORTUNE . 49.000 
DE LUXE VIDEO MELBOURNE HOUSE: 
FERRARI FORMULA 1 ROADWARS ..............39.000 
ne iii SONDA i NENON nice A000 
DISPONIBILE 

LATTICE C 

COMPILER 

VERS. 40 


LIT. 450.000 



















CITIZEN HOP40 
COLORE - 24 AGHI - 80 COL 
200 CPS-380 x 360 DPI 





XEROX 4020 
INK JET COLOR - 80 COL 
120 CPS-360 x 360 DPI 


LASER QMS LPS8+ 
LASER POSTSCRIPT - 8 PAGJMIN. 
300 x 300 DPI - 2 MB RAM 


LI E 











POLAROID PALETTE 
SUPPORTO FOTOGRAFICO 
DIAPOSITIVE 


PERSONAL COMPUTER 
LINEA HITECH PERSONAL COMPUTER 
LINEA XT 4.7/10 MHZ 


XT-HT 256K 1FDD 360K TAST. AVANZ. ....... 850.000 


XT-HT 256Kk 2FDD 360K TAST. AVANZ. ....1.050.000 
XT-HT 256K IDO SO, 

TAST. AVANZ. ...v titti tetta soc 0a02-1:550.000 
LINEA AT 10MHZ 0 WAIT STATE 

AT-HT 512K 1FDD 1.2MB TAST. AVANZ... 1.950.000 


AT-HT 512K 1FDD 1.2MB 1 HD 20MB ASTE AO 














si ieNRene FSNARAST A dee cripenaia parce eci 3.150.000 
LINEA 386 16-20 MHZ 

TOWER 2MB 1FDD 1.2MB 1 HD 40MB TAST. rea 
se es et T.AVANZ 
A sr “RR È ASTLAVANZ. 
SCHEDE PC 

EEE SE EA iii 58.000 
SCHEDA PARALLELA CENTRONICS ............ 36.000 
SCHEDA av AUTOSWITCH ............ a» 490.000 
SCHEDA FAX ua 1.450.000 
SCHEDA COPY CARD Ill_............................... 160.000 
HARD DISK 

HARD DISK 20MB + CONTROLLER ............. 590.000 
HARD DISK 40MB + CONTROLLER .............950. 
HARD CARD 20MB 

HARD CARD 40MB .................................. ‘1.050.000 
COPROCESSORI MATEMATICI 

INTEL 8087 6MHZ ..... .. 250.000 
INTEL 8087 8MHZ 380.000 
INTEL 80287 6MHZ 390.000 
INTEL 80287 8MHZ 580.000 
INTEL 80287 10MHZ . . 690.000 
INTEL 80387 16MHZ 1.250.000 


MONITOR 

PHILIPS 7502/7513 MONOCROMATICO 12°”. 180.000 
PHILIPS 9073 EGA COLORE 14" ................. 850.000 
PHILIPS 8833 COLORE 14" o 
MULTISYNC MONOCROMATICO 

MULTISYNC COLORE 


VENDITA PER CONTRASSEGNO SU TUTTO IL TERRITORIO NAZIO- 
NALE. OFFERTE E PREVENTIVI SU WORKSTATIONS GRAFICHE 
COMPLETE. SETTORI CAD 2D/CAD 3D/ANIMAZIONI 3D/DIGITALIZ- 
ZIONUVIDEO BROADCAST/DESKTOP PUBLISHING. 

SI INVIANO A RICHIESTA SCHEDE TECNICHE PRODOTTI. 

SCONTI PER RIVENDITORI QUALIFICATI. 


PROGRAMMI 









LE ORIGINI 
DI UN FAMOSO 








PROGRAMMA: 





Siamo lieti di presentarvi il capostipite 
dei programmi dedicati alla grafica tridi- 
mensionale per Amiga, esso nasce dalla 
strepitosa mente di Colin French, autore 
anche delle versioni successive create 
per il package Aegis Draw. Senz'altro è 
interessante notare come questo Editor 
sia nato ancora una volta in un linguag- 
gio tanto criticato, ma poplarissimo come 
il Basic. Se vi state muovendo nella gra- 
fica tridimensionale del vostro Amiga pro- 
vate questo “programmino” Basic. Con 
ROT, questo è il nome del programma, 
potete creare un oggetto composto da 95 
punti e da 95 poligoni colorati. Tutto quel- 
lo che vi necessita sono almeno 512K ed 
un mouse. 

Questo programma richiede molta me- 
moria per cui se dal vostro Workbench non 
vi risultano almeno 380.000 byte liberi non 
provate nemmeno a farlo girare. Ricordate 
che il file “GRAPHICS.BMAP ” che si tro- 
va nel disco dell’AmigaBasic deve stare 
sullo stesso dischetto di ROT, spicciatevi 
dunque a trasferire questo file 
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Diamo una rapida occhiata al 
programma 
In ROT l'oggetto è composto da poli- 
goni, come le facce di un cubo. Il poligono 
viene generato selezionando | punti usat 
per i suoi vertici. Ogni poligono deve avere 
almeno tre vertici ma non più di sei. Ogni 
poligono può avere un differente colore, 
ed una accurata scelta delle tonalità può 
produrre dei interessanti effetti d'ombra 
Dopo che è stato creato un'oggetto viene 
disegnata una serie di riquadri (frame) cia- 
scuno contenente l'oggetto in differenti po- 
sizioni. Questi riquadri sono catturati come 
immagini bitmap. Se noi diamo una rapida 
sequenza à questa serie di immagini otte- 
remo un'azione animata. In ogni frame do- 
vete specificare la rotazione e lo sposta- 
mento dell'oggetto lungo le tre assi X, Y e 
Z. Ad esempio incrementando la rotazione 
di un frame attorno all'asse Y otterrete un 
effetto trottola all'esecuzione dell’anima- 
zione. 


L'Editing dell’Oggetto 





Quando Rot viene lanciato per la prima 
volta compare lo schermo Editor di oggetti, 
da qui potete passare all'Editor Azione cli- 
ckando il primo termine del menu Azione. 
Per ritornare indietro portarsi sul primo ter- 
mine del menu Oggetto. Alla sinistra dello 
schermo Editor ci sono tre sezioni dedi- 
cate alla posizione dell'oggetto rispetto alle 
tre assi. Visto dall'alto, di lato e di fronte 
Per vedere come questi si incontrano tra 
oro immaginate di proiettare la figura fron- 
tale e quella dall'alto finché i loro angoli 
non si toccano. Ora avete un mezzo cubo 
che circonda il vostro oggetto. Ogni rota- 
zione applicata all'oggetto avverrà intorno 
al centro di questo cubo. Nei tre riquadri 
della parte sinistra dello schermo c'è vi- 
sualizzato un cerchio che mette in eviden- 
za il punto selezionato al momento. Molte 
volte due punti appaiono uno sopra l'al- 
tro, controllate che la posizione del punto 
sia quella realmente da voi voluta. 


Settembre 1988 


di Alessandro Prandi 


Un punto con tutte tre le cordinanate 
settate a zero viene considerato non esi- 
stente e quindi non viene visualizzato. Cli- 
ckando in uno dei tre riquadri si cambie- 
ranno due delle tre cordinate del punto. 
La modifica delle due cordinate dipende 
dal riquadro in cui si setta il punto. gli an- 
goli del corrente poligono selezionato ven- 
gono evidenziati con il colore arancio. Ov- 
viamente se non è stato scelto alcun ver- 
tice, il poligono non esiste e pertanto non 
verrà evidenziato niente. . 

Nella parte in alto a destra dello scher- 
mo di editing dell'oggetto troviamo una 
serie di controlli per la gestione dei punti. 
In alto c'è la selezione del punto da mo- 
dificare, premete il tasto del mouse quan- 
do siete posizionati sulle relative frecce e 
per portarvi al Punto seguente o prece- 
dente. Se volete uno spostamento più ra- 
pido posizionatevi direttamente nella barra 
tra le due frecce e clickate con il tasto si- 
nistro. Per settare rapidamente tutte le cor- 
dinate al punto zero optate per la casella 
"PUNTO ZERO'. In questo modo il punto 
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diventa inesistente, fate quindi attenzione 
che nessun vertice dei vostri poligoni non 
usi questo valore come vertice. 

Piu' in basso troviamo un altro set di 
controllo per l’edit dei poligoni. Per creare 
un poligono bisogna selezionare i punti 
che ne formano i vertici. Usate l'opzione 
per la scelta del punto, questo verrà evi- 
denziato nei vari riquadri, quindi premete 
su '+ il Pt prec.' per gestire il punto come 
vertice. Un poligono puo' avere dai tre ai 
sei vertici, gli angoli vengono evidenziati 
nei vari riquadri. Ricordate che è molto 
importante la sequenza nella quale sele- 
zionate i vari punti. Andate in una direzione 
lungo il perimetro del poligono, se vedete 
che gli angoli si incrociano allora saprete 
che i punti non sono in ordine. Selezionate 
'CLR ULTIMO PT'per ripercorrere la lista 
dei vertici finché non avrete eliminato il 
problema. Per togliere l’intero poligono, 
non i punti, optate per 'CLR POLIGONO". 

Nella parte inferiore destra dello scher- 
mo c'e' il Palette dei colori. Il colore con il 
quale verrà disegnato il poligono è eviden- 


Vediamo insieme 
la versione Basic 
j di un programma 
del package Aegis Draw 









ziato da un rettangolo arrancione. Per 
cambiare colore vi sarà sufficiente posizio- 
narvi sul colore scelto e clickarlo. Passia- 
mo ora alle selezioni possibili da menu. Nel 
menu oggetto ci sono quattro voci, EDI- 
TOR OGGETTO, CARICA OGGETTO, 
SALVA OGGETTO, NUOVO OGGETTO. 
Lasciamo per ora la prima, e quindi note- 
rete che ci sono le possibilità di salvare una 
figura editata con ROT e quindi ricaricarla 
oppure si può cancellare l'oggetto al mo- 
mento disegnato e ricominciare da capo. 
Ricordate che gli ‘oggetti’ vengono salvati 
con il suffisso .ROTOBJ appeso alla fine 
del nome del file. Quando caricate i file 
oggetto non servirà scrivere .ROTOBJ alla 
fine del nome. Se dimenticate il nome di 
un file potete scegliere la voce 'FILES’ nel 
menu Rot e cercare di individuarlo men- 
tre la lista scorre sullo schermo. 


L’Editing dell'Azione 


Selezionate il primo termine del menu 
Azione per passare allo schermo di edi- 
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ting dell'azione. La parte superiore e' ri- 
servata alla rappresentazione delle figure 
mentre in basso troviamo una serie di pa- 
rametri di controllo. A sinistra c'è la sele- 
zione del frame, posizionandosi sopra le 
relative frecce si passerà da un frame al. 
l'altro e scegliere con quale lavorare. In 
ogni frame si possono modificare le rota- 
zioni dell'oggetto rispetto alle tre assi. Per 
cambiare un valore in particolare basterà 
clickare sopra lo '0’ relativo ed immetere 
il numero desiderato. | valori immessi ven- 
gono controllati dal programma per assi- 
curarsi che essi siano compresi in valori 
accettabili. Dopo aver inserito i valori una 
freccia arrancione vi indica la scritta ‘Rifà 
Frame’ per comunicarvi che il frame deve 
essere ridisegnato. 

Clickando in ’Rifa' Framè si ordina al 
programma di ricalcolare l'immagine nel 
frame in modo che corrisponda ai valori 
da voi indicati. A questo punto potete pas- 
sare al frame successivo e ripetere l’ope- 
razione, e continuate sinché tutti i 12 frame 
sono stati ridisegnati. Se ritornate allo 
schermo dell'Oggetto e ridisegnate un'al- 
tra figura e quindi la riportate nello scher- 
mo dell'Azione essa non comparirà nei vari 
frame. Per aggiornarli dovrete selezionare 
ciascun frame e quindi clickare su ’Rità 
frame’; per evitare questa noiosa proce- 
dura potete selezionare 'Rifà tutto’ ed il 
programma penserà a completare l'intera 
sequenza. Dopo aver disegnato tutti e do- 
dici i frame premete il tasto del mouse su 
'Play' per vedere l'animazione. Regolate 
la velocita’ di esecuzione agendo sull'in- 
dicatore "Tempo'. Per rivedere la sequen- 
za animata all'infinito selezionate 'Ripete 
ciclo' nel menu azione, un segno vicino 
alla scritta comparirà quando questa fun- 
zione sarà attivata. 

Un altra opzione del menu Azione è 
quella di ‘Ripete ciclo inverso’. Questa vo- 
ce sta ad indicare che l'animazione par- 
tirà dal frame 1 e continuerà fino al 12 e 
poi ritornerà indietro di nuovo all'1. Questi 
ultimi due comandi possono essere usati 
anche contemporaneamente. Per fermare 
una sequenza animata selezionate 'Stop'. 


GOTO main: 
intro: 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT * 
PRINT * 


Note: le routine in AmigaBosic* 
sono molto lente la prima volta” 
che vengono lette." 


Gli altri termini contenuti nel menu Azione 
servono a salvare l'azione dell'oggetto, a 
caricarla da disco ed a cancellare l'azione 
corrente. Il file che viene salvato contiene 
solo i fattori necessari per disegnare il fra- 
me. Quando caricate un'azione seleziona- 
te ‘Rifà tutto' per rigenerare i frame. Essi 
non vengono salvati perché occuperebero 
all'incirca 109K. L'operazione richiedereb- 
be più di sei minuti per il caricamento o il 
save tramite l’AmigaBasic. Speriamo che 
i comandi BLOAD e BSAVE arrivino pre- 
sto anche nel Basic Amiga. 

L'ultima voce del menu Azione si chia- 
ma 'Calcolo tra...’ ed ha un ruolo molto 
importante. Essa calcola e disegna i frame 
che si trovano tra due figure da voi scelte. 
Ad esempio se stabilite le coordinate e 
l'incremento di un oggetto nel frame 1 e 
nel frame 12 e quindi scegliete questa o- 
pzione il programma calcolera’ per voi tutti 
i frame che vanno dal 1 al 12. Settate la 
rotazione su Y del frame 1 a 90 gradi e 
quella del frame 7 a 180. Poiché deside- 
rate avere sei figure intermedie che par- 
tano da 90 e finiscano con 180 gradi ogni 
figura ruoterà di 15 gradi rispetto all'asse 
Y. Naturalmente potete ottenere lo stesso 
risultato disegnando frame per frame ma- 
nualmente mentre con 'Calcolo tra...' tutta 
l'operazione viene condotta automatica- 
mente. Ricordate che il programma sce- 
glie sempre la direzione della rotazione in 
modo da muovere l'oggetto attraverso 
l'angolo più piccolo possibile. Se settate il 
frame iniziale a zero gradi e quello finale 
a 270 gradi, l'oggetto ruotera di -90 gradi 
e non di +270. 


Diffetti del programma 


Alla prima esecuzione delle routine A- 
migaBasic del programma avrete l’impres- 
sione che il computer abbia fatto tilt, visto 
il tempo che passa dal run all'esecuzione 
vera e propria. Portate solo un po' di pa- 
zienza prima di spegnere definitivamente 
la macchina. Infatti la seconda volta che 
una routine viene adoperata i tempi diven- 
tano quelli normali. Ci sono alcune parti 


PRINT * 
PRINT * 
RETURN 

main: 


di ROT, come la routine di caricamento dei 
file, che sono così lente da farvi sospet- 
tare addirittura il peggio. Quando eseguite 
un'animazione con attivato il ciclo inverso 
può succedere che ci sia qualche sfarfal- 
lamento dell'immagine. Questo diffetto 
può essere causato dal basic che disegna 
le immagini con la bitmap nel mezzo della 
scansione dello schermo. Talvolta cambia- 
re i colori di un oggetto aiuta a minimiz- 
zare questo inconveniente. 

Gli incrementi di X e Y non sono delle 
vere e proprie trasformazioni tridimensio- 
nali ma solo degli indicatori che servono 
al disegno del frame sullo schermo. Que- 
sta riduzione è necessaria per ridurre le 
misure delle immagini sullo schermo e 
principalmente per limitare la memoria ri- 
chiesta per depositarle. Durante l'anima- 
zione il secondo frame si sovrappone al 
primo, il terzo al secondo e così via, in tal 
modo viene effettuata la cancellazione dei 
frame precedenti. Se usate un incremento 
troppo grande lungo l’asse X di un oggetto 
piuttosto largo allora noterete che parti di 
esso non vengono cancellate perfettamen- 
te. A questo punto o costruite un'oggetto 
più piccolo 0 diminuite l'incremento in X. 

Il programma così come lo trovate oc- 
cupa tutti | 25K di Basic disponibili e molti 
commenti sono stati tolti dal listato per non 
andare oltre i limiti consentiti. Purtroppo 
nen c'e nemmeno lo spazio per un con- 
trollo di eventuali errori durante l'I/O del 
disco, per cui dovete conoscere perfetta- 
mente il nome del file da caricare, per una 
verifica potete usare l'opzione 'Files' nel 
menu ROT. 


Conclusioni 


Sicuramente le versioni successive di 
questo programma, in C, offrono maggiori 
opportunità di quelle qui esposte però a 
nostro modesto parere ci pare molto inte- 
resante osservare la struttura di questo 
programma per capire come anche il Ba- 
sic possa offrire delle bune prestazioni a 
prescindere dal fattore cronometrico. 


Siate pazienti se ROT vi sembra” 
troppo stressante." . 


IF FRE(0)<1000006 THEN CLEAR, 1500006 


GOSUB init 
quit=0 


b=MOUSE( 0) 


WHILE NOT(quit) 
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x=*MOUSE( 1) 
y*MOUSE( 2) 
IF b<>0 THEN 
IF objscr THEN GOSUB edobj 
IF sctser THEN GOSUB edect 
END IF 
meMENU( 0) 
i=MENU( 1) 
IF m<>0O THEN GOSUB menuchk 
2$-INKEYS 
IF 2$<>"* THEN GOSUB keychk 
mENO 
GOSUB cleanup 
END 


menuchk: 

ON ® GOSUB rotmenu, obfmenu, actmenu 
RETURN 
rotmenu: 

IF i-1 THEN GOSUB listfiles 

IF i-3 THEN quit*=(-1) 

RETURN 


objmenu: 
IF jet AND objser=0 THEN 
obfscer=(-1) 
actsor=0 
MENU 
MENU 
MENU 
MENU 
MENU 
MENU 
MENU 
MENU 
MENU 
MENU 
MENU 
GOSUB drw.objscr 
END IF 
IF i-2 THEN GOSUB loadobj 
IF i=3 THEN GOSUB saveobj 
IF i-4 THEN GOSUB newobj 
RETURN 
actmenu: 
IF i-1 ANO octscr=0 THEN 
actscr*(-1) 
objscr=0 
MENU 
MENU 
MENU 
MENU 
MENU 
MENU 
MENU 
MENU 
MENU 
MENU 
MENU 
FOR net TO 12 
frmchg(n)=1 
NEXT 
GOSUB drw.actscr 
END IF 
IF i=2 THEN GOSUB loadact 
IF i-=3 THEN GOSUB saveact 
IF 1-4 THEN GOSUB newact 
IF i-6 THEN 
actrpt=NOT( actrpt) 
MENU 3,6,1+ABS( actrpt) 
END IF 
IF i-? THEN 
actrev=NOT(actrev) 
MENU 3,7,1+ABS( actrev) 
END IF 
IF i-8 THEN GOSUB calctween 
RETURN 


listfiles: 
s$-"File in:" 
GOSUB drw.filereqg 
s$-"DF0:" 
GOSUB getstring? 
IF s$<>"c" AND s$<>"C" AND s$<>"" THEN 
CLS 
FILES s$ 
PRINT 
GOSUB8 click.continue 
IF objscer<>0 THEN 
GOSUB drw.objscr 
ELSE 
GOSUB drw.actscr 
END IF 
GOSUB nobut 


aus aLboi suv 


DOOC0O D+ gen 
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ENO IF 
RETURN 
losdobj: 
3$-"Losd:* 
GOSUB dru.filereg 
GOSUB getstring 
IF s$<>"c" AND s$<>"C" AND s$<>"" THEN 
s$-s$+".ROTOBI" 
OPEN s$ FOR INPUT AS #1 
FOR n=0 TO 95 
FOR n2=0 T0 3 
INPUT#I,pt(n,n2) 
NEXT 
NEXT 
FOR n=0 TO 9S 
FOR n2-0 TO 6 
INPUT#!,poly(n,n2) 
NEXT 
NEXT 
FOR n=e0 TO 95 
INPUT#!,polyclr(n) 
NEXT 
FOR n-°0 TO 95 
INPUT#1,vrt(n) 
NEXT 
CLOSE #1 
pist 
poly*1! 
END IF 
GOSUB drw.objscer 
RETUAN 
saveodbj: 
5$-"Save:* 
GOSUB drw.filerea 
GOSUB getstring 
IF $$<0>"c" AND s$<>"C" AND s$<>"" THEN 
5$-5$+".ROTOBI" 
OPEN s$ FOR OUTPUT AS #1 
FOR n=0 TO 9S 
FOR n2-0 703 
PRINT#I,pt(n,n2}; 
NEXT 
NEXT 
FOR n=0 TO maxpoly 
FOR n2=0 T0 6 
PRINT#1,poly(n,n2}); 
NEXT 
NEXT 
FOR ne0 TO moxpoly 
PRINT#!,polycir(n); 
NEXT 
FOR n=0 TO maxpoly 
PRINT#I1,vrt(n); 
NEXT 
CLOSE #1 
END IF 
GOSUB drw.objser 
RETUAN 
newobj: 
s$-" Cancello l’oggetto?” 
GOSUB you.sure 
IF sure THEN 
FOR n=0 TO maxpt 


FOR n2-=0 TO 2 
pt(n,n2)-0 
NEXT 
NEXT 
FOR n=0 TO maxpoly 
FOR n2=0 TO 6 
poly(n,n2)=0 
NEXT 
polyelr(n)=0 
vrt(n)=0 
NEXT 
ptei 
poly=1 
END IF 
GOSUB drw.objscr 
RETURN 


loadact: 
s$="Load:" 
GOSUB drw.filereg 
GOSUB getstring 
IF s$<>"c" AND s$<>"C"* AND s$<>"" THEN 
s$*5$+".ROTACT" 
OPEN s$ FOR INPUT AS #1 
FOR net TO 12 
INPUI#I,xrot{n),yrot(n),zrot(n) 
INPUT#I,xtran(n),ytran(n),ztran(n) 
NEXT 
INPUT#!,spd,actrpt,actrev 
CLOSE#1 
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fr= Frm*! actrpt=0 
R ectrewv=0 
frmchg MENU 3,6,1 
NEX MENI x 1 
08 ru.franua frme1 
SUB vt. 8g n ENO IF 
3OSUB w.fact GOSUB drw.actser 
SUB w.update RETUAN | 
ttween 
INE 1131131 4 IF stfrmbaendfrm THEN SWAP stfrm,endfrm 
SUB tfre tp=endfra-stfre 
RETUAN INE( )-(311,131 bf 
saveact xrot(stfra 
s$="Save xrot=(360-xrot)*(-1 
30SUB w.filera =xrot+360 
( B get x 
AN $<>* AND s$<>"* THEN stfrm 
n (360-yrot)®*(-1) 
$ A T #1 yrot+360 
f xrot yrot | stfrm) 
; = na stra itrà | (360-zrot)*(-1) 
NEX Ì =zrot+360 
RINT#I jjsctrpt;aectre 
E #1 | tren(stfrm 
If -xtra 
1 17 4 en ytran(stfrm) 
3OSUB putfrm “ytran/sty 
RETURN rtraneztran(endfrm)-ztron(stfrm) 
atran-ztra 
newact 1A frmestfrasi 1 
s$-" Cancello l’azione?” *fra-stYra 
SUB vov.sure xrot(frm)=xrot(stf tpxrot®n) 
sure THEN I x t( frm fra) <xrot( rm) -360 
FOR ne T 1 IF xrot( fra rot(frm)-xrot(frm)+360 
=Qizcotla)ed yrot(frm)=yr *INT( stpyrot®n 
n) =0:ztran(n)=0 IF yrot yrot(frm)=yrot(frm)-360 
IF yrot(frm)<O THEN yrot(frm)-yrot(frm)+360 
rr )=rzrot(stfrm)+INT( stpzrot*r 











Finestra oggetto. 
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IF zrot(frm)>359 THEN zrot(frm)=zrot(frm)-360 
IF zrot(frm)<0 THEN zrot(frm)*zrot(frm)+360 
xtran(frm)=xtran(stfrm)+INT(stpxtran*n) 
ytran(frm)=ytran(stfrm)+INI(stpytran®n) 
ztran(frm)=ztran(stfrm)+INT(stpztran®n) 


GOSUB drw.frmnun 
GOSUB drw.factors 
GOSUB high.redraw 
GOSUB drw.frame 
GOSUB getfrm 
frmchg( frm)=0 
GOSUB drw.update 
GOSUB unhigh.redrow 
NEXT 
frmestfra 
GOSUB drw.frmnum 
GOSUB drw.factors 
END IF 
LINE(0,0)-(311,131),0,bf 
GOSUB putfrm 
RETURN 


gettween: 
GOSUB drw.tweenreg 
maxchar=2 
xt=188:yt=24 
GOSUB getstring 
stfrmeVAL(s$) 
IF stfrm<ì THEN stfrm=i 
IF stfrm>12 THEN stfra=12 
yt=82 
GOSUB getstring 
endfrm=VAL( s$) 
IF endfrm<t THEN endfrm=i 
IF endfrm>12 THEN endfrm=12 
RETURN 


dru,tmweenreg: 
LINE(58,48)-(254,92),0,bf 
LINE(60,50)-(252,90),3,bf 
LINE(61,51)-(251,89),2,bf 
CALL moveS(rp6,26,66) 
PRINT "Calcolo intermedio” 
CALL moveG(rp6,92,74) 
PRINT " Dal Frame:" 
CALL moveG( rpG, 108,82) 
PRINT “Al Frame:" 

RETURN 


drw.filereg: 
LINE(50,48)-(262,92),0,bf 
LINE(5S2,50)-(260,90),3,bf 
LINE(53,51)-(259,89),2,bf 
CALL moveG( rp&, 60,66) 
PRINT * File Requestor" 
IF s$<>"File in:" THEN 
CALL move6(rp6,92,74) 
PRINT “(‘C’ per uscire)" 
END IF 
CALL moveG(rp6,60,82) 
PRINT s$ 
xt<68+LEN( s$) 8 
yt=82 
maxchar=23-LEN( s$) 
RETURN 
frachg(frm)=0 
GOSUB drw.update 
NEXT 
fra-tfra 
GOSUB drw.frmnum 
GOSUB drw.factors 
GOSUB putfra 
GOSUB unhigh.redraw2 
GOSUB nobut 
RETUAN 


playbut: 
GOSUB high.plaey 
GOSUB unhigh.stop 
GOSUB freeze.menu 
frainc=i 
clickstop=0 
WHILE NOT(clickstop) 
fra=frmefrminc 
IF frm>12 THEN 
IF actrev THEN 
frasi? 
frminc=(-1) 
ELSEIF actrpt THEN 
frasi 
ELSE 
frei 
clickstop=(-1) 
END IF 
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ENO IF 
IF frm<1 THEN 
IF actrpt THEN 
frm-2 
frainc=? 
ELSE 
frm=1 
clickstop=(-1) 
ENO IF 
ENO IF 
GOSUB putfrm 
GOSUB drw.frmanum 
FOR n=e0 TO 39-spd 
b=MOUSE( 0) 
x*MOUSE( 1) 
y*MOUSE( 2) 
IF b<>0 THEN 
IF x>260 AND x<306 AND y>152 AND y<164 THEN 
clickstop=(-1) 
n=39-spd 
END IF 
IF x>263 AND x<303 ANO y>128 AND y<183 THEN 
spd=x-263 
GOSUB drw.spdnum 
END IF 
END IF 
NEXT 
WEND 
GOSUB drw.factors 
GOSUB drw.update 
GOSUB unhigh.play 
xt=108:yt=184 
maxcher=4 
numonly=! 
GOSUB getstring2? 
GOSUB high.stop 
GOSUB unfreeze.menu 
GOSUB nobut 
RETURN 


stopbut: 
RETURN 


spdslider: 
spd=x-263 
GOSUB drw.spdnum 
RETURN 


mod.xrot: 
s$=STAS$( xrot(frm)) 
xt=108:yt=17S 
maxchar=4 
numonly=1 
GOSUB getstring2 
xrot(frm)*VAL( s$) 
xrot(frm)*xrot(frm) MOD 360 
IF xrot(frm)<O THEN xrot(#rm)=xrot(frm)+360 
GOSUB drw.factors 
frmchg( frm)=1 
GOSUB drw.update 
GOSUB nobut 

RETURN 


mod.yrot: 
$$-STAS( yrot(frm)) 
xt=164:yt=192S 
maxchar=d 
numoniy=1 
GOSUB getstring? 
yrot(fre)=«VAL( s$) 
yrot(frm)«yrot(frm) MOO 360 
IF yrot(frm)<O THEN yrot(frm)=yrot(frm)+360 
GOSUB drw.factors 
frachg( fra)=1 
GOSUB drw.update 
GOSUB nobut 

RETURN 


mod.zrot: 
s$-STA$( zrot(frm)) 
xt=220:yt=12S 
maxchar=d 
numonly=1 
GOSUB getstring? 
zrot(frm)=VAL(s$) 
zrot(frm)=zrot(frm) MOO 360 
IF zrot(frm)<O THEN zrot(frm)=zrot(frm)+360 
GOSUB drw.factors 
frachg(fra)=1 
GOSUB drw.update 
GOSUB nobut 

RETURN 


mod.xtron: 
s$-STAS( «tran(£re)) 


xtran(frm)=VAL(s$) 
IF xtran( rm) <-90 THEN xtren(frm)=(-90) 
IF xtran(frm)>90 THEN xtran( frm)=90 
GOSUB drw.fectors 
frachg(fra)=1 
GOSUB drw.update 
GOSUB nobut 
RETURN 


mod.ytran: 
#$-STR$( ytran( frm)) 
xt=164:yt=184 
maxchar=3 
numonly=1 
GOSUB getstring? 
ytran(frm)=VAL( s$) 
IF ytran(frm)<-8 THEN ytran(frm)=(-8) 
IF ytran(#rm)>8 THEN ytran(frm)=8 
GOSUB drw.factors 
frachg( fre)=1 
GOSUB drw.update 
GOSUB nobut 
RETURN 


mod.ztran: 
s$-STA$(ztran(fre)) 
xt=220:yt=184 
mexchar=4 
numonly=1 
GOSUB getstring2 
ztran(frm)-<VAL( s$) 
IF ztran(frm)<O THEN ztran(fre)=0 
IF ztran(frm)>999 THEN ztran( frm)=999 
GOSUB drw.factors 
frmchg(frm)-1 
GOSUB drw.update 
GOSUB nobut 
RETURN 


drw.frame: 
GOSUB unit.motrix 
IF xrot(frm)>O THEN GOSUB apply.xrot 
IF yrot(frm)>0 THEN GOSUB apply.yrot 
IF zrot(frm)>O THEN GOSUB apply.zrot 
IF rtran(frm)>O THEN GOSUB apply.ztran 
GOSUB transform.pts 
GOSUB convert?ser 
GOSUB sort.poly 
LINE(0,0)-(311,131),0,bf 
GOSUB drw.obfect 

RETURN 


motprep: 
FOR row=0 T0 3 
FOR col=0 T0 3 
tri(row,col)=tran(row,col) 


tr2(row,col)=0 
NEXT 
NEXT 
RETURN 


unit.matrix: 
FOR row=0 TO 3 
FOR col=0 T0 3 
tran(row,col)=0 
IF row=col THEN tran(row,col)=1 
NEXT 
NEXT 
RETURN 


matmult: 
FOR row=0 T0 3 
FOR col=0 TO 3 
t=0 
FOR et=0 T0 3 
tetetri(rom,e!)*tr2(e1,c01) 
NEXT 
tren(row,col)=t 
NEXT 
NEXT 
RETURN 


apply.xrot: ‘ruota l'oggetto intorno all'asse X 
GOSUB metprep 
rad=xrot(frm)#3.1416/180 
tr2(0,0)=1:tr2(3,3)«t 
tr2(1,1)=COS(rad):tr2(1,2)*SIN(rad)*(-1) 
tr2(2,1)*SIN( rad) :tr2(2,2)*COS( rad) 
GOSUB matmult 

RETURN 


apply.yrot: "ruota l'oggetto intorno all'asse Y 
GOSUB matprep 











rad=yrot(frm)*3.1416/180 
tr2(1,1)=1:tr2(3,3)s1 
tr2(0,0)=COS( rad):tr2(0,2)*SIN( rad) 
tr2(2,0)-SIN( rad) *(-1):tr2(2,2)*COS( rad) 
GOSUB metmult 

RETURN 


epply.zrot: “ruota l'oggetto intorno all'asse 7 
GOSUB matprep 
radezrot(£re)*3.1416/180 
tr2(2,2)=1:tr2(3,3)<1 
tr2(0,0)<COS( rad) :tr2(0,1)*SIN rad)*(-1) 
tr2(1,0)-SIN( rad):tr2(1,1)*COS( rad) 
GOSUB matmult 

RETURN 


apply.rtran: “trasporta l'oggetto lungo l’asse Z 
GOSUB matprep 
tr2(0,0)*1:tr2(1,1)*1 
tr2(2,2)=1:tr2(3,3)*1 
tr2(3,2)=:tran(frm) 

GOSUB matmult 
RETURN 
transform.pts: 
COLOR 1,0 
FOR p=i TO 95 
LOCATE 1,5 
PRINT "Calcola il Punto";p 
IF pt{p,0)<>0 0A pt(p,1)<>0 OR pt(p,2)<>0 THEN 
FOR col=0 T03 
t*0 
FOR et=0 10 3 
tetept(p,e1)*tran(el,col) 
NEXT 
tpt(p,col)=t 
NEXT 
ENO IF 
NEXT 
RETURN 


convert2scr: * converte i punti sulle coordinate dello schermo 
FOR p=1 TO 95 
rezeye/(tpt(p,2)+zeye) 
tpt(p,0)=INT(tpt(p,0)*r)+hor. 
tpe(p,1)=(INT(tpt(p,1)*r))*(-1)e*voff 
NEXT 
RETURN 


reset .polyorder: 

FOR nei TO maxpoly 
polyord(np0)=0 
polyord(n,1)=0 

NEXT 

RETURN 


sort.poly: 
GOSUB reset. polyorder 
FOR ne! TO maxpoly 
LOCATE 1,16 
PRINT "Poligono"n 
IF vrt(n)>O THEN 
t*0 
FOR n2=î TO vrt(n) 
tet+tpt(poly(n,n2),2) 
NEXT 
polyord(n,0)-INT(t/vrt(n)) 
END IF 
NEXT 
FOR n=1 TO maxpoly 
LOCATE 1,24 
PRINT n; "di nuovo.” 
IF vrt(n)>O THEN 
t=(-100) 
pe(-1) 
FOR n2=1 TO maxpoly 
IF vrt(n2)>O THEN 
IF polyord(n2,0)>t THEN t=-polyord(n2,0):p=n2 
END IF 
NEXT 
polyord(n,1)=p 
polyord(p,0)=(-100) 
END IF 


NEXT 
COLOR 1,2 
RETURN 


drw.obfect: 
FOR n=1 TO maxpoly 
IF vrt(n)>2 TMEN 
FOR n2=1 TO vret(polyord(n,1)) 
AREA( tpt(poly(polyord(n,1),n2),0)+xtran(frm),tpt(poly(polyord 
(n,1),n2),1)+ ytran(frm)) 
NEXT 
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COLOR polyclr(polyord(n,1)) 
AREAFILL 
END IF 
NEXT 
COLOR 1,2 
RETURN 


getfre: 
GET(hoff-64+xtran(frm),voff-S8+ytran(frm))-(hoff+63+xtran(frm), 

voff+5?+ytran(frm)),frameG((frm-1)*frmsize) 

RETURN 


putfra: 
PUT(hoff-64+xtran(frm),voff-S8+ytran(frm)),frameG((frm-1)*frmsize) 

+PSET 

RETURN 


getstring: 
3800" 


getstring2?: 
GOSUB freeze.menu 
GOSUB nohey 
numchar=LEN( s$) 
CALL moveG(rpG&,xt,yt) 
PRINT s$; 
28»"” 


getstring3: 
LINE(xt+numchar®8+1,yt-7)-(xt+numchar#8+4,yt+2),3,bf 
2$-INPUT$( 1) } 
LINE(xt+numchar*8+1,yt-?)-(xt+numchar®*8+4,yt+2),2,bf 
IF 2$=*CHA$(8) OR z$=CHA$( 31) OA 2$=CHAS( 127) THEN 
IF numchar>0 THEN 
PRINT CHRAS$(8);" ";CHA$(8); 
nunchar=numcher-1 
8$*LEFTS$(s$,nunchar) 
END IF 
END IF 
IF ASC(z$)>31 AND numchar<maxchor AND numoniy=0 THEN 
58-5$+2$ 
PRINT 28; 
numcher=numcher+1 
END IF 
IF ASC(=$)>31 ANO numchar<maxchar THEN 
IF numonly=1 THEN 
IF (2$>="0" AND 7$<="9") OA 2$-"-" THEN 
s$-3$+:$ 
PRINT 28; 
you. sure: 
GOSUB drw.surereg 
GOSUB nobut 
answer=0 
WHILE NOT(answer) 
b=MOUSE( 0) 
x*MOUSE( 1) 
y*MOUSE( 2) 
IF b<>0 THEN 
IF y>80 AND y<92 THEN 
IF x>75 ANO x<127 THEN 
sure=(-1) 
answer=(-1) 
END IF 
IF x>187 AND x<239 THEN 
sure=0 
answer=(-1) 
ENO IF 
END IF 
GOSUB8 nobut 


drw.surereg: 
LINE(43,48)-(270,100) ,0,bf 
LINE(45,50)-(268,98),3,bf 
LINE(46,51)-(267,92),2,bf 
CALL moveb( rp6, 53,66) 
PRINT * Siete sicuri!!!" 
CALL moveb(rp6,53,74) 
PRINT LEFT$( s$,24) 
LINE( 25,80) -( 127,92),1,b 
LINE( 182,80) -(239,92),1,b 
CALL movwe6(rp6,93,89) 
PRINT "SI" 
CALL moveb( rpE, 190,89) 
PRINT * NO” 

RETURN 


Keychk: 
RETURN 


edobj: 
IF x>189 AND x<306 THEN 
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y>24 ANO y<32 THEN GOSUB ptslider 
y>82 AND y<90 THEN GOSUB polyslider 
y>36 ANO y<48 SHEN reropt 
y>94 AND y<106 THEN GOSUB addpt 
y>110 ANO y<122 THEN GOSUB undopt 
y>126 AND y<138 THEN GOSUB delpoly 
y>142 ANO y<171 THEN GOSUB selcir 
END IF 
IF x>3 ANO x<82 AND y>3 AND y<82 THEN 
pt(pt,2)=(x-vx1)*-1) 
pt(pt.,0)=(y-vy1)*(-1) 
GOSUB drw.views 
GOSUB nobut 
END IF 
IF x>3 ANO x<82 AND y>96 AND y<175 THEN 


pt(pt,2)=(x-vx2)*-1) 
ppt, 1)=(y-vy2)*-1) 
GOSUB drw.views 
GOSUB nobut 

END IF 

IF x>97 AND x<176 AND y>96 ANO y<125 THEN 
pt(pt,0)ex-vx3 
pipe, 1)=(y-vy3)*-1) 
GOSUB drw.viems 
GOSUB nobut 

ENO IF 

RETURN 


zeropt: 
pept 
GOSUB unhigh.pt 
-GOSUB erase.pt 
pt(pt,0)=0 
pe(pt,1)*0 
pe(pt,2)=0 
GOSUB drw.pt 
GOSUB high.pt 
RETURN 


addpt: 
IF wrt(poly)>S THEN BEEP:RETUAN 
IF pt(pt,0)=0 ANO pt(pt,t)=0 ANO pt(pt,2)-O FHEN RETURN 
vrt(poly)=vrt(poly)+t 
poly(poly,vrt(poly))=pt 
GOSUB drw.views 
GOSUB nobut 
RETURN 


undopt: 

IF vrt(poly)>O THEN 
poly(poly,vrt(poly))=0 
vrt(poly)=vrt(poly)-1 

END IF 

GOSUB drm. views 

GOSUB nobut 

RETURN 


delpoly: 

IF vrt(poly)>O THEN 
espolycir(poly) 
GOSUB unhigh.clr 
FOR n=e0 TO vrt(poly) 

poly(poly,n)=0 
NEXT 
vrt(poly)*0 
polyclr(poly)=0 
c*polyclr(poly) 
GOSUB high.clr 

END IF 

GOSUB drw.views 

GOSUB nobut 

RETURN 


selcìr: 
IF x>19? AND x<304 THEN 


csINT((x-192)/14)+INT((y-143)/7)#8 

IF ce>polyclr(poly) THEN 
GOSUB high.clr 
SWAP c,polyclr(poly) 
GOSUB unhigh.clr 

END IF 

END IF 
RETURN 


drw.views: 
GOSUB8 erase.viems 
pept 
GOSUB high.pt 
FOR p=1 TO maxpt 
GOSUB drw.pt 
NEXT 
pept 
tepoly 
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PROGRAM 


Oggetto 


MI 


< Edi tor 
Carica 


Azione 
Azione 


Nuova Azione 


Ripete Led 
Ripete ciclo 
Calcola 


inverso 
temi; i 


N! [Rifa” Frane] [Piay] 
CONE a 
Rotazioni: X- 6 (51 
Incremento :X_=- 6 br s di - 


Finestra azione. 

























INE(vx2-pt(poly{poly,n-1),2),vy2-pt(poly(poly,n-1),1)) 


FOR na ] 
vy2-pt(p poly,n),1 
NEX si y{poly,n-1) vy3-pt(poly(poly,n-1),1 
vy3-pt(poly(poly,n) 
roly=t 
B high 
RETURA 
ae 
6,9 6 f EN 
- NO IF 
| 
w.pt RETURN 
erase.poly 
*OLOR | 
N RE N | 
A AN 
a' 
8 w 
è “ N 
ETURN 
I ig” y 
| s 
ah. R AA 
Ì IR 
| Ta el 
| IR y N 
| AN *8 
| A 3 4 ) 
| g AN 
| R È 
RE 
| NE ì 
| dr RN 
| | 
| HEN Î 
PSET(vxt-pt(poly(poly,1),2),vyi-pt(poly(poly,1),0)) | 
PSET( vx2-pt(poly(poly,1),2),vy2-pt(poly(poly,1),1)) | | f g' 
PSET( vx3+pt(poly(poly,1),0),vy3-pt(poly(poly,1),1)) t=pt 
IF vrt(poly)>! THEN | HE 
FOR n=2 TO vrt(poly | 
LINE(vx1-pt(poly(poly,n-1),2),vyi-pt(poly(poly,n-1),0)) | J8 “ um 
-(vxi-pt(poly(poly,r vyi-pt(poly(poly,n),0) B gh.F 
| 
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i GOSUB nobut 


ELSEIF x>199 ANO x<295 THEN 
pept 
SOSUB8 unhigh.pt 
pt=x-199 
pept 





JB drw.ptnum 
B high.pt 


nobut 








lr(poly 
nhigh.clr 


poly 








GOSUB high.clr 
GOSUB nobut 
ELSEIF x>298 THEN 


“polyclr(poly 


oo 





ly*maxpoly 





dn O003|/'v 


Finestra oggetto. 
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Carica 
Salva 


PROGRAMM 





eda 

| IF x>4 AND x<122 AN 
IF x>140 AND x<25 

| IF x>260 AND x<306 











Î IF 
| y>177 AND y<185 
| IF x x<140 
IF x x<19 
IF x x<25 
END I 
| RETURN 


Azione 
Oggetto 
Oggetto 
Oggetto 





AND x<250 AND y>136 AND 





>150 ANO y<158 THEN GOSUB frmslider: RETURN 
y<148 THEN GOSUB drw.frm: RETUAN 

AND y>152 AND y<164 THEN GOSUB drw.allfrm: RETURN 
AND y>136 AND y<148 THEN GOSUB playbut:RETURAN 

AND y>152 ANO y<164 THEN GOSU8 stopbut : RETURN 
AND y>1?8 AND y<î83 THEN GOSUB spdslider:RETUAN 


THEN 


y 











THEN GOSUB mod.xrot :RETUAN 
96 THEN GOSUB d sot :RETURN 
32 THEN GOS ot: RETURN 

THEN 

THEN GOSUB mod.xtran: RETURN 

6 THEN GOSUB mod.ytran:RETUAN 


52 THEN GOSUB mod.ztran:RETUAN 
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GOSUB drw.franua 
GOSUB drw.updaete 
GOSUB drw. factors 
G0SUB putfrm 
GOSUB nobut 

ELSEIF x>16 AND x<110 THEN 
frm<INT((x-16)/8)+1 
GOSUB drw.frmnum 
GOSUB drw. update 
LINE(0,0)-(311,131),0,bf 
GOSUB drw. factors 
GOSUB putfrm 
GOSUB nobut 

END IF 

RETURN 


drw.fra: 
GOSUB high.redraw 
GOSUB drw.frame 
GOSUB getfrm 
frmchg( frm)=0 
GOSUB drw.update 
GOSUB unhigh. redraw 
GOSUB nobut 

RETURN 


drw.allfrm: 
GOSUB high. redraw2 
tfrmefra 
FOR frm=1 TO 12 
GOSUB drw. frmnum 
GOSUB drw. factors 
GOSUB drw. frame 
GOSUB getfrm 
drw.leftarrow: 
AREA( x,y) :AREA( x+3, y-3) :AREA( x+3, y+3) : AREAFILL 
LINE(x,y)-(x+6,y) 
RETURN 


drw.righterrow: 
AREA( x,y) :AREA( x-3,y-3) : AREA( x-3,y+3) : AREAFILL 
LINE(x,y)=(x-6,y) 

RETURN 


drw.uparrow: 
AREA( x,y) :AREA( x-3, y+3) :AREA( x+3, y+3) : AREAFILL 


LINE(x,y)-(x,y+6) 
RETURN 


drw.ptnum: 
LINE( 199,26)-( 296,30) ,0,bf 
LINE( 198+pt,26)-(201+pt,30),3,bf 
CALL move6(rp&,244,21) 
PRINT RIGHT$( “00”+*STAS(pt),2) 
RETURN 


drw.polynum: 
LINE( 199,84) -(296,88) ,0,bf 
LINE( 198+poly,84)-(201+poly,88),3,bf 
CALL moveG(rpG, 244,79) 
PRINT RIGHTS( "00"+STR$( poly),2) 
RETURN 


drw.actscr: 
LINE(0,0)-(311,131),0,bf 
LINE(0,132)-(311,186),2,bf 
x*140:y*136:GOSUB drw.button2 
y*152:G0SUB drw.button2 
x*260:y=136:GOSUB drw.button3 
y=152:6G0SUB drw.button3 
LINE( 260, 178)-(306,183),1,b 
LINE( 262, 184) -(307,184),0 
LINE -(307,129),0 
LINE(4,150)-( 122,158),1,b 
LINE( 12,150)-(114,158),1,b 
LINE(6,159)-(123,159),0 
LINE -(123,151),0 
coLor 0 
AREA( 7,154) : AREA( 9, 152) :AREA( 9, 156) : AREAFILL 
AREA( 117,152) :AREA( 119, 154) :AREA( 112, 156) : AREAFILL 
COLOR 1,2 
CALL moveG(rp6, 28,145) :PRINT "FRAME #" 
CALL moveG(rp6,4,125) :PRINT “"Rotezioni: X= Y 2.” 
CALL moveG(rp&,4,184) :PRINT “"Incremento:X* Yo Ze"; 
GOSUB unhigh. redrew 
SOSUB unhigh.redraw2 
GOSUB unhigh.play 
GOSUB high.stop 
CALL moveG(rp&, 264,175) :PRINT "Tempo" 
GOSUB drw.frmnum 
GOSUB drw.spdnum 
GOSUB drw.update 
GOSUB drw.factors 
GOSUB putfrm 





RETURN 


drw.frmnum: 
LINE( 15,152)-(111,156),0,bf 
LINE( ?2+frm®8,152)-( 1S+frm®8,156),3,bf 
CALL moveG(rp&, 84,145) 
PRINT RIGHT$( "00"*STAS( frm) 2) 
RETURN 


drw.spdnun: 
LINE( 262, 180)-(304,181),0,b 
LINE( 261+spd, 180) -(265+5spd,181),3,b 
RETURN 
drw.update: 
LINE( 115,138) -(131,146),2,bf 
IF frmchg(frm)<>O THEN 
LINE( 135,142)-(131,142),3 
LINE -(127,138),3 
LINE(131,142)-(127,146),3 
ENO IF 
RETURN 


drw.fectors: 
CALL moveS(rp6, 108,178) 
PRINT LEFT$(STAS(xrot(£rm))+" 
CALL move6(rp6&, 164,125) 
PRINT LEFIS(STR$( yrot(frm))+" 
CALL moveG(rpE, 220,175) 
PRINT LEFTS(STAS( zrot(frm))+" 
CALL moveG(rpE, 108, 184) 
PRINT LEFT$(STA$(xtranl(frm))+" 
CALL moveG( rpE, 164, 184) 
PRINT LEFT$(STRS$( ytran(frm))+" 
CALL moveG(rpE, 220,184) 
PRINT LEFI$(STAS$(ztran(frm))+" 
RETURN 


unhigh.redrew: 
LINE( 141,137) -(249,142),2,bf 
CALL move6(rpG, 148, 145) 
PRINT * Rifa’ Frame” 

RETURN 


high.redraw: 
LINE( 141,13?)-(249,147),3,bf 
COLOR 1,3 
CALL moveG(rpG, 148,145) 
PRINT “ Rifa’ Frame" 
COLOR 1,2 

RETURN 


unhigh.redraw2: 
LINE( 141,153) -(249, 163) ,2,bf 
CALL moveC(rpé, 156,161) 
PRINT “"Rife’ tutto” 

RETURN 


high. redraw2: 
LINE( 141,153) -(249, 163) ,3,bf 
COLOR 1,3 
CALL moveG(rp6,156,161) 
PRINT "Rifa’ tutto” 
COLOR 1,2 

RETUAN 


unhigh.play: 
LINE(261,137)-(305,147),2,bf 
CALL moveG(rptE, 268,145) 
PRINT "Play" 

RETURN 


high.play: 
LINE(261,137)-(305,147),3,bf 
COLOR 1,3 
CALL moveG(rp6,268, 145) 
PRINT "Play" 
COLOR 1,2 

RETURN 


unhigh.stop: 
LINE( 261,153) -(305, 163) ,2,bf 
CALL move6(rp6,268,161) 
PRINT “Stop” 

RETURN 


high.stop: 
LINE(261,153)-(305,163),3,bf 
COLOR 1,3 
CALL moveG(rpG, 268,161) 
PRINT "Stop" 
COLOR 1,2 

RETURN 


drw.button2: 
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LINE(x,y)-(x+110,y+12),1,b 
LINE(x+2,y+13)-(x+111,y+13),0 
LINE -(x+111,y+1),0 


RETURN 


drw.button3: 


LINE(x,y)-(x*46,y*12),1,b 
LINE(x+2,y+13)-(x+47,y+13),0 
LINE -(x*47,y+1),0 


RETURN 


numchar=numcher+1 
END IF 
END IF 
ENO IF 
IF 2$<>CHA$( 13) THEN getstring3 
numonly=0 
GOSU8 unfreeze.menu 


RETURN 


click.continue: 


LOCATE 21,4 
PRINT * Per continuare 
PRINT 
PRINT " premere il tasto sinistro del mouse"; 
GOSUB nobut 
b=MOUSE( 0) 
WHILE b=Q0 
beMOUSE( 0) 


beMOUSE( 0) 
WHILE be>0 

b=MOUSE( 0) 
WENO 


RETURN 


nokey: 


2$-INKEYS 
WHILE 2$<>"* 
2$*INKEYS 


DEFINT a-p,u-2 
DECLARE FUNCTION setdrmd LIBRARY 
DECLARE FUNCTION move LIBRARY 
LIBRARY “"dfl:graphics. library" 
SCREEN 1,320,200,5,1 
WINDOW 2,"Rot",(0,0)-(311,186),0,1 
WINDOW QUIPUT 2 
rp&-WINDOW 8) ’puntatore alla porta raster 
PALETTE 0,0,0,0 
PALETTE 2,0,.5,0 
PALETTE 31,0,.25,0 
PALETTE 30,.7,.2,0 
LOCATE 3,1 
GOSUB intro 
DIM pt(95,3) ,poly(95,6) ,polyclr(95),vrt(95) 
DIM xrot(12),yrot(12),zrot(12) 
DIM xtran(12),ytran(12),ztran(12),frmchg( 12) 
DIM tran( 3,3) ,tr1(3,3),tr2(3,3),tpt(95,3),polyord( 95,1) 
DIM frameG( 27876) 
ptet:poly=i 
objscr=-1:actscer=0 
wx1=43:vx2=43:vx3=136 
vy1=43:vy2=135:vy3=135 
moxpt=95:moxpoly=95 
frm=1:spd=20 
frmsize=2323 
hoff=156:voff=66:zeye=440 
actrpt=0:actrev=0 
FOR n=1 TO maxpt 
pt(n,3)=1 
NEXT 
GOSUB init.menu 
COLOR 1,0 
GOSUB click .continue 
COLOR 1,2 
GOSUB drw.objscr 


RETURN 


Editor Oggetto 
Carica Oggetto 
Selva Oggetto 
Nuovo Oggetto 
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Editor Azione 
Carica Azione 
Salva Azione 
Nuova Azione 
Ripete ciclo 
Ripete ciclo inverso” 
Celcole tre... * 


unfreeze.menu: 
MENU 1,0,1 
MENU 2,0,1 
MENU 3,0,1 
RETURN 


cleanup: 
WINDOW CLOSE 2 
SCREEN CLOSE 1 
LIBRARY CLOSE 
PALETTE 0,0,.25,.58 
PALETTE 2,0,0,0 
MENU RESET 

RETURN 


drw.objscr: 
LINE(0,0)-(320,200),2,bf 


LINE(2,2)-(83,83),0,bf 
LINE(2,95)-(83,176),0,bf 
LINE( 96,95) -( 127, 176),0,bf 
LINE( 186,2)-(310,53),1,b 
LINE( 186,60) -(310,126),1,b 
LINE(191,142)-(304,171),0,bf 
FOR ye0 T0 3 

FOR x=0 TO 7 

LINE( 193+x®14,144+y®7)-(204+x®14,148+y®7),y®B+x,bf 

NEXT 
NEXT 
x*189:y=126:GOSUB drw.button 
y*110:60SU8 drw.button 
y*94:GOSUB drw.button 
y*36:G0SUB drw.button 
y*24:60SU8 drw.scroll 
y*82:G0SUB drw.scroll 
CALL moveC(rpE,228,12):PRINT "PUNTO" 
CALL moveG(rpG, 236,21) :PRINT "#" 
CALL moveG(rp&, 208,45) :PRINT “Punto Zero” 
CALL moveG(rp6,220,70) :PRINT "POLIGONO" 
CALL moveé( rp, 236,79) :PRINT “"#" 
CALL moveG(rp&,200,103) :PRINT "+ il Pt prec." 
CALL moveG(rpG,200,119) :PRINT "Clr ultimo Pt" 
CALL move6(rp&,192,135S) :PRINT “ Cir Poligono" 
CALL moveG(rp&,10,92):PRINT “Vertice 2° 
CALL moveG(rp6, 10,185) :PRINT "Lato 2°; 
CALL moveG(rpE,96,185) :PAINT "Frontale X"; 
CALL moveG( rp&,96,16):PRINT "Xx" 
CALL moveG(rpG,86,109) :PRINT "Y" 
x=2:y789:GOSUB drw.leftarrow 
y*182:G0SU8 drw.leftarrow 
x*89:y*2:G0SUB drw.upaerrow 
y*95:G0SUB drw.uparrow 
x*166:y=182:GOSUB drw.rightarrow 
GOSUB drw.ptnum 
GOSUB drw.polynum 
GOSUB drw.views 
c=polyclr(poly) 
GOSUB high.clr 
GOSUB nobut 

RETURN 


drw.button: 
LINE(x,y)-(x+116,y+12),1,b 
LINE(x+2,y+13)-(x+112,y+13),0 
LINE -(x+112,y+1),0 

RETURN 


drw.scroll: 
LINE(x,y)-(x+116,y+8),1,b 
LINE(x+8,y)-(x+109,y+8),1,b 
LINE -(x+117,y+1),0 
COLOR 0 
AREA( x+3,y+4) : AREA( x+5,y+2) : AREA( x+5,y+6) 
AREAFILL È 
AREA( x+112,y+2) :AREA( x+112,y+6) :AREA( x+114,y+4) 
AREAFILL 

RETURN 
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Pietro Adorni 
ELETTROTECNICA 
GENERALE 


NIE 681455 N 

pp. 412 e L. 24.000 

Gli argomenti trattati sono quelli 
essenziali per una completa 
preparazione di base di elettro 
tecnica. Nessun aspetto teorico 
di definizione o di dimostrazio 
ne viene enunciato senza esse 
re adeguatamente motivato dal 
punto di vista logico-funzionale 
Glì esempi, ampiamente di 
scussi, consentono di passare 
dal teonco al pratico con disin 
voltura 


Paul B. Zbar 

Joseph G. Sloop 
DALL'ELETTROTECNICA 
ALL'ELETTRONICA 
INTEGRATA 

Manuale di laboratorio 


NIE 681469 Q 

pp. 760 e L. 45.000 

In questo testo vengono affron 
tate le tematiche nquardanti 
corsi di esercitazioni pratiche d 
elettrotecnica, elettronica di ba 
se ed elettronica integrata 
Ogni esperimento prevede l'in 
dicazione degli obiettivi didattico: 
da raggiungere, una introduzio 
ne tecnica, un sommano con 
un test di autovalutazione 
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Pp. 200 € L. 18.000 

Il libro fornisce una metodolo 
gia sistemistica onentata alle 
applicazioni nel campo dell'au 
tomazione, del controllo, del 
l'automatica in generale. Ven 
gono presentati gli elementi 
tecnologici che portano alla 
realizzazione dei sistemi e ghi 
strumenti di natura teonca e 
metodologica per l'analisi e la 
sintesi di sistemi di qualsiasi 
natura automatica 


Herbert Taub 

Donald Schilling 
FONDAMENTI 

DI ELETTRONICA 
INTEGRATA DIGITALE 


NIE 681110 JI 

pp. 308 e L. 24.000 

Dal famoso testo dei prof. Taub 
e Schilling, ampiamente utiliz- 
zato nelle università italiane, si 
è effettuata una riedizione adat 
ta alle scuole medie supentori 
La trattazione privilegia un ap 
proccio funzionale e conduce 
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Dino Pellizzaro 
MISURE 
ELETTRICHE 


NIE 681447 Q 

pp. 400 e L. 25.000 

Vengono affrontate tutte le te- 
matiche relative ad un corso di 
misure elettriche e laboratorio. 
con particolare nsalto alle eser 
citazioni il cui scopo è spesso 
quello di ncavare spenmental 
mente le leggi che governano 
elettrotecnica. La presentazio 
ne di data sheet, apparecchia 
ture e strumenti, consente di af 
frontare gli aspetti relativi alla 
tecnologia e alle costruzioni 


Mauro Gargantini 
Armando Zecchi 
ELETTRONICA 
INTEGRATA LINEARE 


NIE 681416 X 

pp. 392 e L. 23.000 

Un efficace manuale per poter 
impostare la progettazione cir 
cuitale sulle nuove tecnologie 
elettroniche e la loro realizza 
zione pratica. Viene approfon- 
dito lo studio dell'amplificatore 
operazionale e delle sue appli 
cazioni. Viene affrontata tutta 
l'area di progettazione della mi 
croelettronica lineare 


Mario Malcangi 

SISTEMI DIGITALI 
PER L'AUTOMAZIONE 
Corso di sistemi 
d'automazione Vol. Il 


NIE 681453 L 

Pp. 200 e L. 18.000 

Nella parte tecnologica vengo- 
no irattati gli elementi di base 
dei sistemi a microprocessore, 
delle unità programmabili di na 
tura centrale e periferica, degli 
strumenti di comunicazione tra 
sistemi programmabili. Nella 
parte metodologica vengono di- 
scussi gli elementi fondamenta 
li per l'analisi e lo sviluppo di si- 
stemi programmabili. 


Eugenio Piana 
Pierfranco Ravotto 
PROGETTARE CON 
L'ELETTRONICA 
DIGITALE 

Dalla logica cablata 

al programmabile 


NIE 681459 R 

pp. 640 e L. 32.000 
Sintetiche schede di teoria” ac- 
compagnano 66 “esercitazioni” 
tutte rivolte alla comprensione 
ed all'uso di componenti in 
commercio di cui sono forniti i 
data sheet. E possibile realiz 
zare in proprio, a scuola o a ca 
sa, la scheda necessana per 
alimentare, montare e provare | 
diversi circurti 
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Thomas L. Floyd 
CIRCUITI ELETTRICI 
Corso di elettrotecnica 
generale 


NIE 681471 A 

pp. 672 e L. 35.000 

Questo libro tratta gli argomenti 
essenziali relativi ai circuiti elet- 
trici in corrente continua e in al- 
ternata, con particolare riguar 
do alle applicazioni e alla riso 
luzione dei problemi proposti a 
due livelli, uno relativamente 
basso, l'altro più impegnativo e 
stimolante. Alla fine del libro 
sono fornite le soluzioni 


Giuseppe Giuliano 
MICROPROCESSORI 
Architettura e 
programmazione 


NIE 681461 X 

PP. 252 e L. 20.000 

Partendo dai concetti di base e 
dagli aspetti circuitali e di pro 
grammazione associati al mì 
croprocessore, la trattazione si 
concretizza nella descrizione di 
tre diverse MPU. Di esse una è 
del tutto generica e viene tratta 
ta quale base teorica per facili 
tare la comprensione del com 
ponente microprocessore. Le 
restanti rappresentano l'IMPU 
Z80 e l'8086 


Mario Malcangi 

SISTEMI, 
AUTOMAZIONE 

E CONTROLLO 

Corso di sistemi 
d'automazione Vol. Ill 

NIE 681393 B 

pp. 192 e L. 18.00 

Vengono affrontate le tecniche 
dell’acquisizione dati, il control 
lo, il trattamento numerico dei 
segnali e la comunicazione dei 
dati. Il libro comprende una 
parte a carattere metodologico 
hardware della logica program 
mata, software, applicazioni in 
tempo reale e modelli di control 
lo 
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Alessandro Gava 
TELEMATICA DI BASE 


NIE 681381 C 

pp. 192 e L. 18.000 

Un testo efficace per fornire ai 
futurì periti in telecomunicazio- 
ne le conoscenze di base ri 
chieste dal mercato del lavoro 
Viene analizzato il mondo della 
telematica, nei suoi aspetti fon- 
damentali: dispositivi standard 
e sistemi di comunicazione 
Particolare accento viene posto 
sui modem banda base e fonici 
di cui vengono descritti il fun- 
zionamento ed il miglior uso, 
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Paul B. Zbar 
Joseph G. Sloop 
LABORATORIO 
DI ELETTRONICA 
INTEGRATA 


NIE 681405 X 
pp. 246 e L. 18.000 
Le caratteristiche dei circuiti in 
tegrati linean e degli amplifica 
ton operazionali. Vengono pro 
poste espenenze per utilizzare 
feuiti integrati per la genera 
zione dei segnali e | circuit 
PLL. Si mostrano alcune utiliz 
zazioni det circuiti integrati digi 
tali e dei convertiton A/D e D'A 


Renzo Traversini 
MICROELETTRONICA: 
TECNOLOGIE 

E DISPOSITIVI 

Corso di tecnologie 
elettroniche Vol. Il 

NIE 681126 W 

pp. 192 € L. 18.000 


Le tecnologie piu utilizzate per 
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Mariangela Botti 
DAL PROBLEMA 
AL PROGRAMMA 


NIE 681352 J 
pp. 328 * L. 24.000 
biettivo è quello di fomire agli 


allevi che iniziano lo studio de 
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Felice Tarantini 
COMMUTAZIONE 
TELEFONICA 
AUTOMATICA 
NIE 681403 Q 

pp. 220 e L. 23.000 








Fornisce agli studenti la com 
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tuali sistemi interamente elet 
IMici, evidenziando l'aspetto 
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tocommutatori. Vengono po 
descritti il funzionamento della 
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niche di commutazione nelle 
centrali 
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Joseph G. Sloop 
LABORATORIO DI 
ELETTROTECNICA 


NIE 681399 M 

pp. 302 e L. 21.000 

L'uso del multimetro, la realiz 
zazione di alcune reti elettriche 
le carattenstiche di alcuni cam 
pi elettrici e magnetici, l'utilizzo 
dell'oscilloscopio, alcune eser 
citazioni su condensatori, sugli 
induttori e quindi sui circuiti RL 
RC, RLC serie e parallelo 


Fosco Bellomo 
ELEMENTI PASSIVI 
TECNOLOGIE 

E DISPOSITIVI 
Corso di tecnologie 
elettroniche Vol. | 


NIE 681457 P 

pp. 352 e L. 24.000 

Vengono introdotti | fondamenti 
tecnologici relativi ai matenali 
utilizza nel campo elettronico 
e ai parametri meccanici, fisici 
e chimici che ne determinano la 





scelta. Vengono analizzate le 
tecnologie costruttive degli ele 
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Peter Bishop 
INFORMATICA 
GENERALE 


NIE 681473 J 

pp. 540 e L. 24.000 

Cod.: SD668 

Tutti gli aspetti teorici e pratic 
della materia informatica, come 
previsto da grammi mainiste 
nal p Is 


striali e Comr 
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ialì. Si articola 
ni: | principi del 
elaborazione dell'informazio 
ne, la struttura dell'elaboratore 
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Giuseppe Saccardi 
TELEMATICA DAI 
PROTOCOLLI 
ALLE RETI 


NIE 681449 X 

pp. 240 e L. 24.000 

Il mo della telematica par 
ll’evoluzione verso le 
he, descrivendo | 

protocolli di trasmissione sin 
croni oggi più usati, cioè i BSC 
SDLC, l'HDLC. Sono descritti 

dispositivi per reti telematiche 
di Muftiplazione e di concentra 
zione, il che permette di com 
prendere il passaggio da una 
rete convenzionale ad una 
commutazione di pacchetto 
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pp. 272 e L. 18.000 
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Fosco Bellomo 
MICROELETTRONICA 
NUOVE TECNOLOGIE 
Corso di tecnologie 
elettroniche Vol. ili 

NIE 681467 W 

pp. 200 e L. 18.000 
L'obiettivo in questo testo è 
quello di fornire, a completa 
mento dei programmi ministe 
nali del triennio degli Istituti 
Tecnici 
4 


una conoscenza ap 





ndita sulle nuove tecnolo 





K 
gie. con la descrizione delle 
mete raggiunte e dei vantaggi 
pttenut ed ipotizza 





lì casi, quali potranno ess 


successivi svilupp 


Salvatore Consentino 
ORGANIZZAZIONE 
INDUSTRIALE STUDI 
DI FABBRICAZIONE 
E DISEGNO 


NIE 681463 K 
pp. 216 e L. 22.000 
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Paul H. Young 
COMUNICAZIONI 
ELETTRICHE 

Corso di radioelettronica 


NIE 681465 M 

pp. 498 ® L. 34.000 
Partendo dalla descrizione de 
gli amplificatori a radiofrequen 
za, degli oscillaton, degli spettri 
dei segnali e dei sistemi di mo 
dulazione d' ampiezza, s: passa 
alla trattazione dei piu moderni 
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italiano specializzato nell'area delle nuove tecnologie, entro cui offre un 
range completo di prodotti e servizi, che garantiscono la risposta precisa 
a qualsiasi domanda di conoscenza o aggiornamento da parte dell'utente, 
sia esso neofita o esperto professionista. 

Le riviste Jackson si articolano da quest'anno in quattro aree editoriali 
specifiche strutturate per mercato, al fine di offrire al lettore notizie 
e servizi sempre più approfonditi e adeguati alla posizione di 
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assoluta leadership del Gruppo Editoriale Jackson, su scala nazionale 
e internazionale. 

Il recente accordo con la multinazionale dell'editoria tecnica V N U 
Business Press Group assicura, infatti, alle riviste Jackson l'accesso a 
un network internazionale di notizie e informazioni tecniche in ogni 
specifico settore di intervento editoriale, indispensabile per parlare di 
nuove tecnologie offrendo il massimo dell'aggiornamento e della profes- 
sionalità. Queste le quattro aree editoriali Jackson per il 1989, cui si 
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aggiungono, ovviamente, l'area Libri e Grandi Opere e l'area Formazione, Trasmissione Dati e Telecomunicazioni 

che assieme alle riviste, consentono a Jackson di proporsi come l'unico —TECNOLOGIE E MERCATI 

vero “sistema editoriale integrato nell'High Technology": Watt @ Lab News © Industria Oggi @ Meccanica Oggi @ Media 
ELETTRONICA E AUTOMAZIONE © EO News Settimanale @ Elettronica —Production @ Strumenti Musicali 


Oggi @ Automazione Oggi @ Strumentazione e Misure Oggi HOBBY E HOME COMPUTER © Fare Elettronica @ Amiga Magazine 
INFORMATICA E PERSONAL COMPUTER ® Amiga Transactor @ Commodore Professional © 
Informatica Oggi Settimanale @ Informatica Oggi @ Bit @ PC Magazine Supercommodore 64 e 128 e Olivetti Prodest User @ 
© PC Floppy @ Computergrafica & ee © Compuscuola @ PC Software @ PC Games è 3 ‘4 Software 
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A*DOS 


In questa nostra tappa del viaggio al- 
l’interno dell’Amiga ci soffermeremo sul 
modo di lavoro dell’AmigaDOS. Per capi- 
re i cavilli dell'AmigaDOS dovete inanzi- 
tutto frenare l'impulso di sfasciare la ta- 
stiera e quindi evitare di riempire di coto- 
ne le fessure dei vostri drive. 

| drive di cui è dotato l’Amiga sembrano 
essere molto più lenti di quello che non lo 
siano in realtà. L'hardware dedicato ai flop- 
py disk può leggere un'intera traccia, circa 
5600 byte, in un colpo solo, senza dare 
noie al microprocessore, tuttavia va detto 
che per quanto riguarda l’AmigaDOS, se 
compariamo il suo LIST con il normale DIR 
del PCDOS notiamo una notevole lentezza 
del primo rispetto al secondo. Perché? 
Semplice, il LIST non ha un posto dove 
andare per prelevare le informazioni ne- 
cessarie inerenti al file mentre le directory 









del PCDOS contengono ben specificati i 
nomi dei file, la loro misura, e il luogo in 
Cui si trovano. 

L'AmigaDOS divide il disco da 3.5 in 
1760 blocchi di 512 byte ciascuno, se vo- 
lete lo potete verificare tramite il comando 
INFO del CLI. Undici blocchi comprendo- 
no una traccia (track), un giro completo. Il 
numero di blocco 880 è collocato nel mez- 
zo della superficie del dischetto ed è il 
blocco principale (root block) che corri- 
sponde alla root directory. Nel root block 
sono immagazzinati il nome del disco, l'ora 
e la data dell'ultima modifica, e la tavola 
di controllo (hash table). 

L'hash table è una lista di puntatori alle 
subdirectory o blocchi di inizio file (file hea- 
der blocks). L'AmigaDOS converte il nome 
del file in un numero intero positivo. Que- 
sto numero intero fa riferimento ad un'en- 
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eccetera. | problemi compaiono quando 
due nomi di file hanno lo stesso numero. 
Nell'AmigaDOS per esempio ” Quake” e 
"Los Gatos” hanno tutti e due valore 14. 

Per risolvere questo dilemma si ricorre 
alla subdirectory o al blocco dell’header 
del file. Questo blocco contiene la data e 
l'ora della sua creazione ed un puntatore 
indirizzato alla prossima header della qua- 
le nome ha lo stesso valore. L'AmigaDOS 
compara il nome nel blocco con l'altro. Se 
i nomi differiscono allora l’AmigaDOS pas- 
sa al blocco successivo di header e così 
via, finché non trova il nome esatto o ar- 
riva alla fine della catena, in tal caso il file 
non esiste. 

Questo meccanismo spiega la lentezza 
del comando LIST. L'AmigaDOS deve 
computare il nome del file, andare al pros- 
simo file header, comparare i nomi, andare 








Proseguiamo il nostro 


tratta nella hash table. L'entrata, a turno, 
è il numero del blocco contenente la testa 
del file (file header) o la subdirectory. Le 
subdirectory edi file header assomigliano 
al blocco principale (root block); una su- 
bdirectory punta ai file header e alle altre 
subdirectory, mentre un file header punta 
ai blocchi di dati, dove il file è posto. 
Per convertire i caratteri del nome di un 
file in numeri interi l’AmigaDOS applica 
una funzione di controllo particolare. Un 
esempio di questa funzione è A=1, B=2 


intinerario alla conquista del CLI 


quindi al prossimo file header se non c'è 
un riscontro proseguire, e così via. Le in- 
formazioni del file sono praticamente dis- 
seminate invece di essere centralizzate co- 
me nel PCDOS. 

Per alleggerire questo notevole ritardo, 
l'AmigaDOS mette le subdirectory ed i file 
header nella metà interna del disco ed i 
blocchi di dati nella metà esterna. Sfortu- 
natamente però questo schema interno- 
esterno crea qualche difficoltà al Workben- 
ch. Quando voi aprite una drawer, l’Ami- 
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gaDOS deve portare la testina del drive 
all'interno per trovare il file header corretto 
e quindi all'esterno per leggere i file 
” info”, i quali contengono le icone. Que- 
sto rapido spostamento della testina del 
drive lungo la superficie del disco provoca 
un racappriciante gracidio. Fortunatamen- 
te le ultime versioni del Workbench rac- 
colgono tutte le icone di un drawer in un 
singolo file. 

Non si può negare che ad un primo 
esame il sistema di archiviazione si pre- 
senti perlomeno intricato, ma bisogna con- 
siderare anche i vantaggi che questo me- 
todo offre. La misura e il numero di file 
sono limitati solo dalla capienza del disco. 
Ancora più importante, il sistema è suffi- 
cientemente sovrabbondante in modo da 
permettere che l'albero della directory 
possa essere ricostruito se una parte di 
esso viene distrutta. Due set di puntatori 
descrivono ogni branca dell'albero. Per 
esempio, gli header contengono i punta- 
tori indirizzati al prossimo link nella catena 
vista prima, ai blocchi di dati e cosi via. 
Ogni blocco ha un numero in sequenza, il 
quale indica a chi appartiene, e un che- 
cksum il quale segnala se il blocco è stato 
danneggiato. Con la scansione dei bloc- 
chi, i numeri in sequenza, ed i puntatori 
un programma può ricostruire la struttura 
danneggiata del file del disco. Il Disk-Va- 
lidator compie questo compito ma in pro- 
porzioni limitate. Ogniqualvolta inserite un 
dischetto il Disk-Validator controlla che la 
struttura di archiviazione sia conforme e 
che nessun blocco sia collocato due volte. 

Per l'utente il sistema di archiviazione 
dell'AmigaDOS si presenta come una 
struttura convenzionale ad albero, percor- 
ribile tramite il comando CD. L'AmigaDOS 
vi offre alcuni comandi importanti per po- 
ter manipolare le informazioni contenute 
nelle varie header. 

I blocchi della subdirectory e del file 
header comprendono una flag di prote- 
zione e lo spazio per un commento. Voi 
potete settare le flag di protezione con il 
comando PROTECT nel CLI o tramite l'Info 
del Workbench. Per proteggere un file dal- 
la cancellazione scrivete: 


PROTECT <nomefile> rwe 


Per permettere la cancellazione di un file 
non cancellabile scrivete: 


PROTECT <nomefile> rwed 

Le future versioni del software di sistema 
permetteranno anche di proteggere il file 
dalla lettura, scrittura e dall'esecuzione. 


Per aggiungere un commento ad un file 
scrivete: 


FILENOTE <nomefile> ‘testo’ 
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dove il testo può arrivare sino ad 80 ca- 
ratteri. Il commento lo potete vedere LI- 
STando il file. Voi potete vedere o cam- 
biare il commento anche tramite l'Info del 
Workbench. Con il comando COPY non 
si copia il commento del file, poiché que- 
sto comando crea un nuovo header del 
file. 

Quando voi premete due volte il tasto 
del mouse su un tool o scrivete il nome 
del file da CLI l’AmigaDOS ricerca il file. 
Quando il sistema di archiviazione lo loca- 
lizza il caricatore lo recupera. Il loader leg- 
ge il programma nella memoria usando 
una tecnica chiamata scatter loading (ca- 
ricamento frazionato). Il caricatore fraziona 
il file in pezzi chiamati hunk (fette). Ogni 
fetta comprende l'informazione di come 
essa è inserita rispetto alle altre. Il loader 
a questo punto ripone ciascuna fetta, o- 
gniqualvolta riesce a trovare spazio nella 
RAM e le modifica in modo che ne pos- 
sano trovare un'altra. Lo scatter loading 
sfrutta al meglio la memoria disponibile. 

Una volta che il caricatore ha finito il suo 
compito l'AmigaDOS deve definire come 
il programma interagisce con il resto del 
computer. Il DOS infatti tratta il programma 
come un processo. Ogni processo pensa 
ad un proprio uso esclusivo del micropro- 
cessore, anche se altri processi possono 
spartire l'uso del processore. 

| programmi caricati da CLI condividono 
il processo CLI, mentre il Workbench ge- 
nera un nuovo processo per ogni tool cli- 
ckato due volte. L'AmigaDOS inoltre crea 
dei processi per sorvegliare la porta se- 
riale, il drive, la porta parallela e così via. 

Questi vari tipi di processi comunicano 
tra loro attraverso delle porte di comuni- 
cazione che agiscono similarmenta ai no- 
stri telefoni. Per esempio un editor di testo 
può chiedere al processo del disco di leg- 
gere in un documento. L’I/O del disco però 
rimane impantanato quando due processi 
richiedono il disco allo stesso momento. 
La testina del drive vola avanti ed indietro 
prelevando i dati di un processo e quindi 
dell'altro. Dal punto di vista dell'utente i 
processi sembrano agire contemporanea- 
mente. Diversi comandi vi permettono di 
esaminare e controllare questi processi. 

Normalmente i programmi condividono 
il task del CLI ma voi potete usare un pre- 
fisso per il nome del file con il comando 
RUN, con questa istruzione l’AmigaDOS 
esegue il programma come un processo 
indipendente. Voi potete usare una stringa 
di programmi usando il segno più: 


RUN COPY File RAM: + 
DELETE File + 
ECHO ‘File spostato in RAM” 
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| processi generati con il RUN continua- 
no ad usare la finestra CLI per l'output, 
per creare un nuovo processo con una sua 
finestra scrivete NEWCLI. Con il comando 
STATUS potete listare quali processi CLI 
sono in esecuzione. 

L'AmigaDOS non può interrompere un 
processo una volta iniziato, essi devono 
estinguersi per conto loro. Molti program- 
mi tuttavia vi concedono molto gentilmente 
di essere fermati durante l'esecuzione u- 
sando i tasti CTRL-C. AI posto di CTRL-C 
potete anche usare il comando BREAK, 
BREAK 2 interomperrà l'esecuzione nel 
secondo CLI task, quello con il segno 
”2>”. Quello che succede quando usate 
CTRL-C o BREAK dipende solamente dal 
programma, un programma che si rispetti 
riconosce il segnale di interruzione e si 
ferma. 

Benché l’AmigaDos offra all'utente dei 
mezzi molto potenti non si può definire il 
suo ambiente dei più amichevoli. Fortuna- 
tamente il programmatore può accedere 
ai compiti dell'AmigaDOS modificando al- 
cune funzioni. In effetti ci sono già due 
programmi in grado di addomesticare il 
CLI, questi sono lo SHELL e MyCLI. 

Ad esempio il programma SHELL scritto 
da Randell E. Jesup traduce i vostri sino- 
nimi in comandi AmigaDOS. Basterà inse- 
rire un file “comandi ” nella directory SYS:. 
Il file contiene la risistemazione dei coman- 
di CLI. Un solo sinonimo può comprende- 
re un'intera lista di comandi CLI dandovi 
delle notevoli capacità macro. Comunque 
una volta che lo SHELL ha compiuto i suoi 
processi passa i comandi attraverso al CLI: 
essi non sono comandi interni. 

Indubbiamente l'integrazione dell’Ami- 
gaDOS da parte di programmi di questo 
genere semplifica e sopratutto velocizza 
enormemente il lavoro da eseguire me- 
diante CLI. Un'altro aspetto importante di 
questi programmi è il tipo di editing: nel 
CLI spesso dopo aver scritto una lunga 
sequenza di comandi vi accorgete di aver 
commesso un'errore all'inizio della riga 
(parolaccia!) e quindi siete costretti a can- 
cellare e riscrivere quasi l'intera sequenza. 
L'editor di questi programmi invece si 
comporta quasi come quello di un normale 
wordprocessor con talvolta delle varianti 
molto interessanti. 

Sicuramente nei prossimi numeri assie- 
me al CLI tratteremo parallelamente anche 
i modi di impiego di programmi molto utili 
come ad esempio lo Shell della Metacom- 
co. 
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di Giorgio Dose 


Avete appena scritto un programma in 
Basic sul vostro Amiga e lo trovate un po’ 
lento? Volete aumentarne il numero di gi- 
ri? Seguendo le tecniche usate dai com- 
pilatori e spremendo un po’ le vostre me- 
ningi è possibile incrementare considere- 
volmente la velocità di esecuzione. 

Esistono i metodi più svariati per miglio- 
rare un programma e renderlo più veloce 
ed ognuno di noi conosce diversi trucchetti 
per farlo. Quelle che troverete di seguito 
sono delle regole generali che molti già 
conoscono ma che possono tornare utili 
ai programmatori meno esperti. Alla fine 
dell'articolo inoltre sono riportati alcuni pro- 
grammi per valutare i vantaggi che si ot- 
tengono usando queste tecniche 





Cosa fanno i compilatori 





| vari compilatori C, Fortran, Pascal u- 
sano varie tecniche per diminuire | tempi 
di esecuzione delle loro routine. Molti di 
essi esaminano il codice oggetto e indivi- 
duano dove e come va ottimizzato. Alcuni 
di essi analizzano | passi in cui il program- 
ma impiega molto tempo e le variabili po- 
ste all'interno dei loop, poi decidono con 
“intelligenza” i cambiamenti da apportare 
al programma stesso. Altri compilatori in- 
vece fanno le loro modifiche solo dopo 
aver creato il linguaggio macchina 

Le tecniche che verranno descritte d 
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seguito possono essere applicate a quasi 


tutti | linguaggi a livello sorgente 
Il metodo più semplice è conosciuto co- 
me “costant folding”. Il compilatore esa- 


mina tutte le costanti che possono essere 
combinate fra loro in modo da eliminare i 
relativi calcoli durante l'esecuzione. Con- 
siderate la seguente funzione 


x= 11+2*(x*96+y)" 86+4*5 


dopo che il compilatore ha eseguito la 
trasformazione delle costanti diventerà 


x= 17.2"*(x"15+y) +31 


Sono state eliminate due moltiplicazioni, 
una divisione e una addizione ed il tempo 
di esecuzione risulterà notevolmente più 
breve 

Un altro metodo molto noto è il cosid- 
detto “code motion” e consiste nel ridurre 
| numero di operazioni matematiche all’in- 





terno di un loop. ll compilatore esamina 
quali espressioni non vengono mai mod 
ficate all'interno di un loop e quindi porta 
le stesse al di fuori del ciclo in modo da 
evitare la ripetizione dei calcoli. Conside- 
riamo ad esempio il seguente loop 


FORI = 1 TO 360 STEP 10 
FORJ = 0 TO 360 STEP 


R=20+W 
K = SIN(1)"SIN(J)+COS(1)* COS(J) 
Z=Z+J+R 

NEXT J 


NEXT | 


La prima funzione che salta all'occhio 
è ovviamente R = 20 + W; non c'è nulla 
nfatti, all'interno del loop, che possa mo- 
dificare il valore di R o di W. Il compila- 
tore allora porta l’espressione fuori da en 
trambi i cicli FOR-NEXT 

Osservando il programma con maggio- 
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LA VELOCITÀ 
IN AMIGABASIC 











BASIC! 


re attenzione si può notare che anche la 
variabile | rimane costante nell'ambito del 
loop interno e così pure il valore di SIN(1) 
e COS(I). E quindi possibile portare anche 
questi due calcoli al di fuori del loop. Il ri- 
sultato ottimizzato sarà quind 


R=20+W 

FORI = 1TO 360 STEP 10 
X1 = SIN(I) 
X2 = COSI) 


FORJ=1T0360 
K = X1 * SIM(J) + X2 * COS(J) 
Z=Z+J+R 
NEXT 4 
NEXT | 


L'aver portato fuori dal ciclo due fun 
zioni come SIN e COS incrementa signifi- 
cativamente la velocità di esecuzione del 
programma perché riduce notevolmente il 
numero di calcoli eseguiti. Per ottenere 
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questo miglioramento il compilatore ha do- 
vuto generare due proprie variabili interne 
X1 e X2 e rimpiazzare con esse le funzioni 
SIN(1) e COS(I). Da rilevare che l'operazio 
ne di cui sopra aumenta le prestazioni ma 
occupa più memoria 
Veniamo al BASIC 

| metodi visti or ora possono venire ef- 
ficacemente usati nei vostri programmi in 
AmigaBasic. L'AmigaBasic è un linguag- 
gio interpretato e come tale non è in grado 
di ottimizzare da solo | propri programm 
siamo noi che dobbiamo decidere come 
e dove intervenire nei vari passi del pro- 
cesso. Per scrivere programmi più veloc 
è bene rispettare queste semplici regole 

1) Non usare variabili quando è possi- 
bile usare delle costanti. Ogni volta che 





l'interprete Basic esamina una variabile 
deve guardare la sua tabella delle varia- 
bili per trovarne il valore. Questo non ri- 
chiede molto tempo, però se la cosa si ri- 
pete molto spesso la velocità scende ra- 
pidamente. 

2) Non inserire commenti nei loop che 
richiedono molto tempo per essere com- 
pletati. L'esame dei commenti normalmen- 
te non comporta dei ritardi apprezzabili al 
programma ma nei cicli FOR-NEXT au- 
menta senz'altro il tempo di attuazione dei 
loop stessi. Questo non è un invito a non 
inserire mai | commenti ma solo un con- 
siglio a non metterli nei punti più critici. | 
commenti infatti sono molto utili perché 
facilitano la lettura del programma e la sua 
revisione 0 modifica anche diverso tempo 
dalla stesura ed inoltre consentono ad al- 
tre persone di comprendere meglio il 
funzionamento del programma stesso. 

3) E importante conoscere tutte le fun- 
zioni dell’AmigaBasic; può sembrare una 
cosa ovvia ma è molto facile dimenticarsi 
delle funzioni meno comuni e creare al loro 
posto delle routine meno efficienti. 

4) Evitare le chiamate frequenti alle su- 
broutine. Se ad esempio un programma 
chiama la stessa routine ripetutamente al- 
l'interno di un loop è consigliabile inserire 
| codice della subroutine all'interno del ci. 
clo. Se le subroutine sono più d’una biso- 
gna cercare, se possibile, di fonderle in- 
sieme e crearne una sola. Ogni volta che 
viene chiamata una subroutine infatti |A- 
migaBasic mantiene traccia del punto in 
Cul deve ritornare dopo aver eseguito la 
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il ey Asi fd c ‘ : I 


‘Listato 1 


‘Migliorare la velocita’ dei programmi 
’ 


‘Esempio di "plotting" 


DEF FNa(t) = (100/360*t)/3 


‘Disegna un punto alla volta e 
‘riporta il tempo impiegato 
’ 


CLS 
GOSUB SlowPlot 
FOR i = 1 TO 10000: NEXT i 


CLS 
GOSUB QuickPlot 
FOR i = 1 TO 10000: NEXT i 


CLS 
GOSUB QuickerPlot 


LOCATE 1,1 
PRINT "SlowPlot: 
PRINT "QuickPlot: 


END 


SlowPlot: 

PRINT "SlowPlot" 

a1$ = TIME$ 

FOR j = 20 TO 100 STEP 20 
FOR x = -150 TO -1 STEP .2 


Prima disegna la parte destra 


y = SIN(FNa(x))/(FNa(x))*j+50 


PSET (x+150,y),1 
NEXT x 


subroutine. E ripetere questa operazione 
più e più volte aumenta il tempo di effet- 
tuazione del programma. 


Primo programma 


Passiamo ora ad esaminare un program- 
ma esempio e vediamo come sia possibile 
mettere in pratica quanto finora esposto. 

Il listato uno contiene tre semplici routine 
per disegnare cinque volte una funzione ma- 
tematica con diversi valori dei parametri. La 
prima routine chiamata SlowPlot è quella 
originale, è la più lenta (più di due minuti per 
essere portata a termine) e verrà migliorata 
al fine di ridurne il tempo di esecuzione. 

Nella routine SlowPlot si notano imme- 
diatamente i commenti, inseriti all'interno 
dei loop, che vanno eliminati o portati al- 
l'esterno del ciclo, e la funzione FN che 
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Begin -- ";a1$;" End - ";a28 
Begin -- ";jb1$;" End - ";b2$ 
PRINT "QuickerPlot: Begin -- ";c1$;" End - ";c2$ 





NEXT x 
NEXT 
82$ = TIME$ 
RETURN 


QuickPlot: 


b1$ = TIME$ 


NEXT x 
NEXT j 


b2$ = TIME$ 
RETURN 


c1$ = TIME$ 


NEXT j 
NEXT x 
c2$ = TIME$ 
RETURN 


può essere tolta e sostituita da una sem- 
plice variabile. 

Osservando poi sullo schermo il dise- 
gno della funzione si rileva che è simme- 
trico rispetto al centro; possiamo quindi 
trarre vantaggio da questa simmetria, uni- 
re i loop interni e disegnare entrambi i lati 
della funzione nello stesso tempo. 

Le variazioni apportate alla routine Slo- 
wPlot si evidenziano nella successiva rou- 
tine QuickPlot. QuickPlot impiega circa 50 
secondi per essere condotta a termine, un 
buon risultato! 

Ma vediamo come si possa ancora mi- 
gliorare... 

Nell'esecuzione del loop più interno del- 
la routine QuickPlot si nota che solo l'e- 
spressione contenente la variabile j pre- 
senta un valore sempre diverso, mentre i 
calcoli con lo stesso valore della variabile 
x vengono ripetuti cinque volte (una per 


QuickerPlot: 
PRINT "QuickerPlot" 


FOR x = 1 TO 150 STEP .2 
Ora disegna la parte sinistra 


y = SIN(FNa(x))/(FNa(x))*j+50 
PSET (x+150,y),1 


PRINT "QuickPlot" 


FOR j = 20 TO 100 STEP 20 
FOR x = 1 TO 150 STEP .2 
sy * x*.0925926 
yl = SIM sy)/sy*j+50 
PSET (150-x,y1),1 
PSET (x+150,y1),1 


FOR x = 1 TO 150 STEP .2 
sy = x*.0925926 
SinTemp = SIN( sy)/sy 
FOR j = 20 TO 100 STEP 20 
y1 = SinTemp*j+50 
PSET (150-x,y1),1 
PSET (x+150,y1),1 





ogni diverso valore di j). Invertendo il loop 
interno con quello esterno, per ogni punto 
della funzione disegnato sullo schermo, i 
calcoli, comprendenti la variabile x, ven- 
gono eseguiti una sola volta e non cinque 
volte come avveniva in precedenza. 

Con le ultime variazioni siamo arrivati 
all'ultima routine QuickerPlot che si com- 
pleta in circa 40 secondi. Possiamo ben 
dire di aver fatto un buon lavoro. 

Le tre routine descritte sono state inse- 
rite nel programma una di seguito all'altra 
in modo che si possa facilmente valutare 
il diverso rendimento di ognuna. 


Secondo programma 
La tecnica di ottimizzazione che andia- 


mo a presentare è senzaltro la più efficace 
ma anche la più difficile. Dopo aver com- 
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pletato un programma e aver fatto il pos- 
sibile per aumentare le sue prestazioni, 
facciamo mentalmente un passo indietro 
e chiediamoci: le routine che abbiamo 
scritto sono veramente le migliori o pote- 
vamo fare di meglio? 

E molto difficile dare una risposta e lo è 
ancor di più per i programmatori meno 
esperti. Possiamo fare un piccolo test, non 
per valutare le nostre capacità ma bensi 
per imparare, da un semplice esempio, 
che non sempre la soluzione più logica è 
la migliore, anzi... 

Provate ad esempio a scrivere una rou- 
tine per mescolare un mazzo di carte, sup- 
ponendo di avere un array già inizializzato 
con il nome delle carte e di poter usare 
qualsiasi altra variabile. Avete fatto? Bene, 
potete continuare nella lettura. 

Molti programmatori, in un caso come 
questo, avrebbero scritto una routine molto 
simile alla routine ShuffleA del listato numero 
due. L'idea di base è di creare, oltre a quello 
contenente i nomi delle carte, due nuovi ar- 
ray, uno per mettervi le carte Mescolate man 
mano che vengono selezionate ed uno per 
segnare quelle che sono già state prelevate 
(non vogliamo avere duplicati). 

La routine inizialmente pulisce l’array 


c. DESI n N posi 


‘Listato 2 


‘Migliorare la velocita’ del programma 


‘Esempio "Come mescolare un mazzo di carte" 


DIM card$(52), Shuffled$(52), Check(52) 


DIM Spot$ (4) 


di cuori" 
di quedri” 
di fiori" 
di picche" 


Spot $(0) 
Spot$( 1) 
Spot$(2) 
Spot$( 3) 


DATA "asso", "due", "tre", "quattro", "cinque", "sei", "sette 
DATA "otto”,"nove"”,"dieci”,"fack","donna","re" 


Main: 
RANDOMIZE TIMER 


* ShuffleA 
PRINT "Shuffling ... 
a1$ = TIME$ 

FOR S = 1 TO 10 


RESTORE 

GOSUB Init 

FOR I = 1 TO 52 
Check(I) = 0 

NEXT I 


FOR I = 1 T0 52 


X = INT(RND#52+1) 


IF (Check(X) = 1) GOTO Again 


Shuffled$(I) = card$(X%) 
Check(X) * 1 
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Check o meglio lo inizializza completamen- 
te a zero. Poi, all'interno del ciclo FOR- 
NEXT, usa un numero random per sele- 
zionare una carta a caso e controlla che 
la carta non sia già stata estratta guardan- 
do nell’array Check. Se era già stata scelta 
si preleva un'altro numero random finché 
non si trova una carta che ancora non era 
stata toccata; a questo punto si pone que- 
st'ultima nell'array Shuffled. Il ciclo si ripete 
finché tutte le 52 carte sono state selezio- 
nate e poste a caso nell'array. 

Questo può inizialmente sembrare un 
buon algoritmo ma esaminandolo attenta- 
mente si nota che esso potrebbe impie- 
gare molto tempo per estrarre tutte le carte 
del mazzo. Questo perché man mano che 
le carte vengono scelte e posizionate nel 
nuovo array, aumentano le probabilità che 
esca un numero random corrispondente 
ad una carta già mescolata, con conse- 
guente ripetizione del ciclo. 

Per rimediare a questo difetto, se così 
possiamo chiamarlo, è necessario inserire 
nella routine un certo livello di intelligenza 
artificiale. E quanto si ècercato di fare nella 
seconda routine chiamata ShuffleB. Que- 
sta routine usa meno memoria della pre- 
cedente e risulta più veloce nell'esecuzio- 


NEXT S 
a2$ = TIME$ 


‘ShuffleB 


b1$ = TIME$ 


RESTORE 


NEXT I 


NEXT S 
b2$ = TIME$ 


END 


Init: 
XxX= 1 


READ A$ 


NEXT I 
NEXT J 
RETURN 


GOSUB Init 
FOR I =» 1 TO S2 
Check(I) = 0 


FOR J = 1 TO 13 


FORI=0T03 
card$(X) = A$+Spot$(1I) 
Rena 


ne. L'idea consiste nel prelevare, all'inter- 
no di un ciclo FOR-NEXT, un numero ran- 
dom compreso tra uno e 52 e quindi nello 
scambiare di posto, nell'array contenente 
il nome delle carte, la carta corrente (a- 
vente il numero di posizione progressivo 
uguale alla variabile | del loop) con quella 
il cui numero corrisponde al numero ran- 
dom. Così facendo vengono sempre pre- 
levati solo 52 numeri random e la routine 
impiega sempre lo stesso tempo per me- 
scolare tutte le carte. 

Per mostrare con maggior evidenza la 
diversa velocità di esecuzione delle due 
routine il programma del listato due inizia- 
lizza e mescola il mazzo di carte per ben 
dieci volte. La routine A impiega da 18 a 
22 secondi per essere portata a termine 
mentre la routine B si completa sempre in 
otto secondi. 

Spero che gli esempi sopra riportati sia- 
no di stimolo a migliorare sempre i propri 
programmi; non fermarsi mai alla prima 
idea che viene in mente ma tentare con- 
tinuamente nuovi e diversi modi di risol- 
vere un problema, può sempre capitare 
di inciampare in una soluzione migliore e 
più veloce. 


e RE de PO 


PRINT "ShuffleA -- Start: ";a1$;" End ";a2$ 
’ 


PRINT "Shuffling ... 


FOR S = 1 TO 10 


FOR I = 1 TO 52 


X = INT(RND*52+1) 
SWAP card$(I),card$(X) 
NEXT I 


PRINT "ShuffleB -- Start: ";b1$;" End ";b2$ 
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Attenzione! Attenzione! Siamo il Fronte Combattente 
del Chip Democratico e dirottiamo questa astronave 
sul pianeta Disco Magazine II 


di Alessandro Prandi 


Mi trovavo alla guida della Trans-I- 
stor, astronave di raffinata tecnologia 
appartenente alla flotta multigalattica 
MBI, nell'anno terrestre 1988, quando 
sul diario di bordo dovetti annotare i 
seguenti avvenimenti. 

Fase solare: 4. Distanza dal pianeta 
Centrale: leghe MBI 120. Presunto ar- 
rivo: fase solare 6. 

Ormai poco meno di due fasi solari 
separavano me e i passeggeri della 
Trans-Istor da un meritato riposo nelle 
lussuose sale messe a disposizione dal- 
la MBI a tutti ì clienti e equipaggi delle 
sue linee interplanetarie. 

Fase solare: 5. Distanza dal pianeta 
Centrale: leghe MBI 60. Presun.... 

A questo punto irruppe nella cabina 
di comando un gruppo di tre umanoidi 
e un replicante, i quali senza troppi 
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complimenti, mi comunicarono un 
messaggio da annunciare al passegge- 
ri. Con un disintegratore atomico pun- 
tato alla gola lessi le seguenti parole: 
" Attenzione! Attenzione! Siamo il Fron- 
te Combattente del Chip Democratico 
e dirottiamo questa astronave sul pia- 
neta Disco Magazine II." 

Da quel tempo sono passate innu- 
merevoli fasì solari e, sinceramente, 
debbo dire che nè io nè i mieì passeg- 
geriì d'allora invidiamo le piatte forme 
di vita del pianeta Centrale. Le gior- 
nate su Disco Magazine II trascorrono 
meravigliosamente e ogni tanto ricor- 
diamo con gioia che fortunatamente 
nessun riscatto è stato pagato per il 
nostro ritorno 
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Storie come questa ormai non fanno 
più notizia da quando l'Amiga è entrato 
nelle nostre case. La sua capacità di 
acquisire proseliti ovunque è ben nota 
anche ai più disinteressati. Avremmo 
potuto stupirvi con effetti speciali, in- 
vece la realtà cì ha imposto una scelta 
obbligata ed insostituibile nel guidarvi 
alla conoscenza completa dell'univer- 
so Amiga. Questa scelta è stata fatta! 
Amiga Magazine è nata e cresce dì 
giorno in giorno, a testimoniare che 
chiunque si dedichi a questa macchina 
con convinzione e professionalità vie- 
ne largamente ricompensato. 

Solo un anno fa, lo scetticismo nei 
confronti di questo prezioso ed inìimi- 


tabile mezzo regnava in molti dì voi, 
mentre oggi sicuramente rimpiangete 
il tempo sprecato nell'esìtazione. Le 
fonti da cuiì attingere informazioni e 
programmi su Amiga sono ormai pra- 
ticamente innumerevoli e sopratutto }- 
nesauribili, e ciascuna nel profondo 
nasconde un vaso dì Pandora. Il nostro 
obiettivo, non lo nascondiamo, è quello 
di diventare la vostra fonte principale, 
ma soprattutto dì essere ìl tramite della 
vostra conoscenza, in modo da poterla 
trasmettere a tutto il mondo Amiga. 

Non cì riteniamo santoni o profeti o 
presentatori alla “vù cumprà”, ma 
semplicemente, gente che come voi 
condivide le gioie (molte) e le pene 
(poche) dell'evento Amiga. 

L'astronave atterrò su Disco Maga- 
zine II e da quel momento divenimmo 
testimoni ocularì dì un meraviglioso u- 
niverso!! 

La struttura del disco sì snoda nella 
praticissima configurazione ad albero 
e vi offre sei directory principali nelle 
quali troverete i programmi relativi a 
ciascun argomento. Le directory sono: 


Witz 
Giochi 
Musica 
Grafica 
Strumenti 
Magazine 


Dopo aver sperimentato con succes- 
so nel primo numero questo tipo di ge- 
stione del dischetto, siamo dunque 
giunti alla conclusione dì aver imboc- 
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cato la strada giusta e più facilmente 
percorribile. 

Witz è la directory delle sorprese e 
delle curiosità, in essa troverete ogni 
volta dei simpatici programmi che fa- 
ranno divertire voi e il vostro compu- 
ter. Assieme ai programmi eseguibili 
troverete sempre i listati sorgente, in 
modo da stimolare chi di voi volesse 
apportare delle modifiche o migliora- 
menti. Naturalmente questa directory 
non racchiuderà mai dei listati di ir- 
raggiungibile levatura tecnica, ma co- 
munque vi fornirà interessanti spunti 
su cui riflettere. 

Passiamo ora al piatto più ghiotto per 
gli Amiga-player. Nella directory dei 
Giochi potrete misurare il vostro grado 
di abilità, perseveranza, e, talvolta di 
sola fortuna. Per gli Amigomani più in- 
calliti promettiamo fin d'ora una rotta 
costellata di arcade, adventure e chi 
più ne ha più ne metta. Nell’immediato 
prossimo futuro, infatti, inseriremo in 
questa parte del disco delle chicche 
di pregevole valore. Lasciateci solo il 
tempo di confezionarle in modo che 
siano degne di voi. 

Musica è la directory dedicata a 
quelli che credono di poter ancora im- 
parare qualcosa dal Direttore d'orche- 
stra Amiga. Naturalmente sono ben ac- 
cetti anche i rock fans. 

Ed ecco qualcosa che forse vi coin- 
volgerà all'unisono, la Grafica!! A que- 
sto lato così seducente della persona- 
lità Amiga, dedichiamo il massimo spa- 
zio consentitoci. In questo numero vi 
sarà possibile, oltre ai vari programi, 
ammirare dei suggestivi “schizzi” e- 
spressi con il programma De Luxe 
Paint. 

Se qualcuno di voi ha già avuto la 
fortuna di conoscerci, avrà sicuramen- 
te apprezzato la directory Strumenti, 
dedicata alle varie utility necessarie 
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nel lavoro quotidiano con Amiga. La 
ricerca in questo campo è veramente 
vasta, ma il reperimento di programmi 
apprezzabili è tutt'altro che facile, co- 
munque, siamo convinti dì potervi ser- 
vire ora ed in futuro solo il meglio. 

L'ultima, e forse per i più svogliati, 
anche la più attesa, è la directory Ma- 
gazine. Qui troverete tutti i listatì, (FUN- 
ZIONANTI!), contenuti nella rivista. 
Per darvi maggior sicurezza e per e- 
vitare che il vostro lavoro venga reso 
vano da uno stupido, ma ahimè possi- 
bile, errore nella fase di stampa dei li- 
stati, abbiamo pensato di accludere i 
programmi contenuti nella rivista, nel 
relativo dischetto. 

Convenzioni presenti e future. Sì, an- 
che noi vogliamo e dobbiamo segna- 
larvi alcune regole da seguire per una 
migliore comprensione del contenuto 
del dischetto. Analizzando le varie di- 
rectory e sottodirectory da CLI note- 
rete che alcuni file comprendono delle 
estensioni che, a seconda dei diversi 
linguaggi, riguardano i relativi file sor- 
gente. Se il nome di un programma non 
comprende alcuna estensione, vorrà 
dire che esso è direttamente esegui- 
bile, basterà digitarne il nome, prece- 
duto eventualmente dal percorso (dri- 
ve/directory...). I file contenenti l'e- 
stensione ”.info” sono necessari al si- 
stema operativo per raffigurare le va- 
rie icone quando si adopera il Wor- 
kbench. Illustrati questi concetti, 
passiamo ora ad un esame più detta- 
gliato delle varie estensioni che potre- 
te incontrare nei dischetti di Amiga 
Magazine. 


.bas sorgente in Basic 

.c sorgente in C 

.h sorgente header in C 

.asm sorgente in Assembler 

«def sorgente modulo definizione in Modula-2 
sorgente modulo implementazione in 
Modula-2 

sorgente Forth 

«Scr sorgente screen Forth 

.0 file oggetto non linkato 

.0bj file oggetto non linkato 

«sp sorgente in Lisp 


Le estensioni appena elencate ov- 
viamente sono quelle che noi pensia- 
mo di adoperare più frequentemente, 
per cui nel caso dovessimo offrirvi dei 
programmi di diversi linguaggi da 
quelli appena detti, sarà nostra pre- 
mura informarvi delle relative varìa- 
zioni. 

Un'altra considerazione di primaria 
importanza riguarda queì programmi 


SI 


che, una volta caricati, occupano l'a- 
rea di memoria chiamata CHIP ME- 
MORY (primi 512 K). Nel caso il vostro 
Amiga possieda delle espansioni che 
ne incrementano la memoria, dovrete 
selezionare l'icona NOFASTMEM che 
sì trova nella directory SYSTEM del 
disco Workbench; dopo tale operazio- 


ne ì programmi suddetti risulteranno 
perfettamente funzionanti. 


Witz 


Fantasia, ironia e genialità sono le 
tre componenti di questo piccolo ma 
simpatico angolo di svago. Palline co- 
lorate invaderanno il vostro schermo e 
ombre minacciose si rifletteranno sul 
vostro Workbench. I due programmi 
Sproing e Boing, una volta lanciati, fa- 
ranno rimbalzare davanti aì vostri oc- 
chi delle palline bianco-rosse. Notere- 
te che contemporaneamente alla loro 
comparsa viene visualizzata una mini- 
finestra, per interromperne l'esecuzio- 
ne basterà portarsi nel gadget sinistro 
e premere il tasto sinistro del mouse. 
Per quanto riguarda il listato sorgente 
in C di Boing dovete tener presente 
che esso e studiato per il compilatore 
Atzec e che quindi lavora su 16 bit, 
essendo sicuri della vostra profonda 
conoscenza in materìa vì lasciamo la 
libertà di apportare le modifiche ne- 
cessarie per la conversione in un file 
sorgente che possa essere compilato 
dal Lattice. Ricordate che Sproing 
NON può essere lanciato da CLI! Om- 
bre è invece un programma d'effetto 
nel vero senso della parola. Il pro- 
gramma, eseguibile anche da CLI, dà 
un ombra a tutte le finestre presenti 
sullo schermo, dandovi così l'illusione 
dì lavorare in un ambiente tridimen- 
sionale. Nella finestra aperta dal pro- 
gramma trovate due indicatori regola- 
bili tramite mouse, uno controlla l'in- 
tensità dell'ombra mentre l'altro rego- 
la la distanza dalla luce. Anche qui per 
interrompere l'esecuzione dovete por- 
tarvi sul gadget sinistro della finestra 
e premere il tasto del mouse. Purtrop- 
po non possiamo fornirvi ì listati dei 
programmi Sproing e Ombre come 
promesso. Se non vi è troppo difficile, 
provate a perdonarci. 

<<Non donar loro nulla. Piuttosto to- 
gli loro qualche cosa od aiutali a por- 
tarla; ciò recherà ad essi qualche 
sollievo...>>. 

F. NIETZCHE 
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Giochi 

Blackjack e Labirinto sono i giochi 
conì quali vi misurerete questo mese 
Il gioco d'azzardo è dunquè arrivato 
anche nel vostro Amiga. Con Black)a- 
ck vi sembrerà di vivere le emozioni 
dei cow-boy americani quando sfidano 
le slotmachine dei c di tà Ve 
gas. Il gioco, ( dop: ) o } 
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tino di 5000 $. Scegliendo invece Pun- 
tata potete incrementare il piatto sino 
a 500 $ per smazzata. Ricordate che le 

figure come Jack, Donna e Re valgono 
10 mentre il valore dell'Asso dipen- 
derà dal suo abbinamento con una o 
l'altra carta, infatti l'asso può valere sia 
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zione ìl programma crea un labirinto 
con l'accompagnamento di sinistrì ru- 
mori. Una volta terminato il disegno un 
punto giallo comparirà sulla sinistra, 
vicino alla porta d'entrata del Labirin- 
to. Sul lato destro noterete una porta 
analoga che invece è l'uscita. Fin quì 
niente di speciale direte voi? Esatto fin 
qui niente di speciale, ma provate ora 
a gestire il puntino giallo con ì tasti 
cursore e provate a farlo percorrere 
il sentiero giusto per la via dell'uscita. 
Provato? Si? Allora avete già capito 
che non dovete far toccare alcuna pa- 
rete del labirinto a quel maledetto pun- 
tino. Se non riuscite a percorrere que- 
sto intricato groviglio di dedali potete 
sempre munirvi di un filo d'Arianna e 
riprovarci. Buon divertimento!! 


Musica 


Due sono le fantasie musicali dì que- 
sto mese. Music è un breve program- 
mino basic che trasformerà la tastiera 
del vostro Amiga in un potente sinte 
tizzatore. Munitevi di carta e penna e 
iniziate a provare le varie combir nazio 
nì possibili, infatti non alleghiamo al- 
cun commento al programma perché 
rogliamo lasciare al vostro genio mu 
sicale la straordinaria sensazione della 
composizione 
sì può deli re invece » Lab ratorio del 
Suono, anche se in Basic questo pro 
gramma offre apprezzevoli modi di ge- 
stione del suono su Amiga. Nella 
schermata principale troviamo un ric 
co menu che ci offre le varie possibì- 
lità di elaborazione del suono. Nella 
parte centrale dello schermo appare 
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METE QUI”, per Opzioni sì intend 
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| due rettangoli colorati alla vostra sinistra sono 
un palette per il disegno della forma d'onda 
L'onda si ottiene tenendo premuto il tasto 
sinistro del mouse e usando lo stesso per 
disegnarla. Se effettuate questo processo 
lentamente i punti verranno visualizzati più 
vicini l'uno all'altro e otterete così una 
rappresentazione di maggiore precisione 
Ricordate che l'onda è disegnata di lato e che il 
rettangolo rosso ne è la parte inferiore 

Questo programma è dotato di un 
dimensionatore automatico d'onda. Se l'onda 
da voi creata è inferiore ai 255 elementi potete 
ottenerne il dimensionamento fino al suddetto 
valore. Premendo F1 e scrivendo un numero tra 
-128 e 127 e premendo 'Return' otterrete 
dimensionamento automatico 

Quando avete creato la vostra forma d'onda 
potete ritornare alla schermata principale e 
scegliere l'opzione Ascesa/Discesa. | suoni 
creati useranno quindi l'onda da voi stabilita 


KAI 
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ssibilità di accendere o spegnere 


Per ritornare alla forma di partenza spegnete 
(OFF) Attiv/Onda nello schermo principale 
Ricordate che se decidete di generare piu' 
forme d'onda sulla stessa riga solo l'ultima sarà 
funzionante. Click mouse 2 volte per proseguire 








Premi 'ESC'per resettare a 0 le frequenze 
Usate F1 per vedere il vostro sottoprogramma 
Questa funzione và adoperata solo prima di 
provare il suono, ma dopo aver selezionato le 
frequenze 

F2 riporta i valori del sottoprogramma a zero e 





lo cancella 

F3 stampa il sottoprogramma. Siate ben sicuri 
di aver collegato la stampante e soprattutto che 
sia accesa 

F4 Alterna la subroutine con un altra contenuta 
nel programma 





FREQIL 
FREQ1H 
FREQ2L 
FREQ2H 
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SELEZIONATE | SUONI E QUINDI LA 
CASELLA RELATIVA IN BASSO 


Nella parte alta sinistra dello scher- 
mo notate degli indicatori relativi al 
Suono, Frequenza, Tempo, Volume e 
Voce. Iniziate con il selezionare il nu- 
mero di suoni desiderato e noterete 
che nella casella relativa a questi, nel- 
la parte inferiore del vostro monitor, ne 
viene riportato il valore numerico. Una 
volta deciso, clickate sulla scritta Suo- 
no nella relativa casella. La seconda 
selezione riguarda la Frequenza e si 
effettua nello stesso modo adoperato 
per i Suoni. Procedete fino alla Voce 
come appena illustrato. Se per caso 
volete riportare a zero il valore dì qual- 
cuna di queste componenti dovete 
premere il tasto sinistro del mouse es- 
sendovi pero' precedentemente posi- 
zionati sul rettangolino viola che si tro- 
va sotto a ciascuna casella. Vediamo 
assieme l'aiuto interno del program- 
ma. 


Gran parte di questo programma può essere 
controllato per mezzo del mouse. Spostate gli 
indicatori tenendo premuto il tasto sinistro e 
quindi clickate la casella corrispondente per 
settare i valori. Per resettare a 0 i valori 
posizionatevi nei piccoli box viola sotto i vari 
Suono, Freq eccetera e premete il tasto del 
mouse. Le opzioni sulla destra vengono 
adoperate spostando il mouse e tenendone 
premuto il tasto sinistro. 

Solo l'opzione MODO CORDA viene usata dallo 
schermo principale. 


Sperando di essere stati sufficiente- 
mente esaurienti vi lasciamo alle vo- 
stre elucubrazioni sonore. 


<<Ed egli intuonò una melodia orribile e tetra, 
che risuonava ai miei orecchi come un lugubre 
corno! 

Oh cantore assassino, strumento della 
malvagità, innocente tra gli innocenti; già 
m'accingevo alla più bella tra le danze: quando 
tu coi tuoi suoni uccidesti il mio rapimento!>>. 

F. NIETZSCHE 


Grafica 


Colori, colori, colori! Con Palette ab- 
biamo voluto fornirvi un utile strumento 
di lavoro da usare da solo o come su- 
broutine nei vostri programmi. Nell'ul- 
timo caso basteranno alcune semplici 
modifiche. Il punto più interessante di 
Palette è quello di essere in grado di 
fornire il numero esadecimale del co- 
lore selezionato, in modo da permet- 
tervi l'uso diretto dei valori numerici 
neì vostri listati. Per uscire dal pro- 
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gramma selezionate Cancel e premete 
il tasto sinistro del mouse. 

BasicBoing è invece un programma 
in AmigaBasic che presenta un modo 
d'animazione un po' particolare ma si- 
curamente efficace. Per prima cosa il 
programma disegna un cubo e quindi 
calcola le differenti posizioni nelle 
quali farlo apparire. Una volta calco- 
late tutte le posizioni (quaranta), le im- 
magini del cubo vengono scambiate 
velocemente l'una con l'altra, offrendo 
così un effetto animato. 

Se ancora non siete soddisfatti e se 
vi considerate dei critici d'arte eccovi 
delle tele di gran pregio. Nella finestra 
dedicata alla grafica notate un icona 
con il nome SeeILBM. Questo pro- 
gramma serve alla visualizzazione dei 
disegni creati con De Luxe Paint in mo- 
do InterLace. Per visualizzare le im- 
magini Astronave e Guerre_ Stellari 
dovete dapprima selezionare l'icona 
SeeILBM, quindi portarvi sull'icona 
del disegno e premere due volte il ta- 
sto sinistro del mouse assieme allo SHI- 
FT. Dopo aver ammirato le pregevoli 
tele di questa galleria potete ritornare 
al Workbench posizionando il cursore 
nell'angolo alto sinistro dello schermo 
e premendo il tasto del mouse. 

Ai possessori del programma De Lu- 
xe Paint segnaliamo inoltre, che i sud- 
detti disegni possono, ovviamente, es- 
sere caricati anche con quest'ultimo. 
E, dulcis in fundo, eccovi un regalo, 
nascosta chissà dove nel dischetto c'è 
un'avvenente signorina che sarà lieta 
di fare la vostra conoscenza. 


<<Troppo m'’addentrai nell’avvenire: fui colto 
da un brivido d'orrore. 

E quando mi guardai intorno, vidi che il 
tempo era il mio solo contemporaneo. 

Allora volai a ritroso, verso la patria, 
rapidamente: così venni a voi, esseri del 
presente, ..>>. 

<<Ma come ciò m'accadde? Grande era la 
mia angoscia, e pur fui costretto a ridere! Non 
mai ancora il mio occhio aveva veduto cosa 
tanto variopinta e bizzarra! 

lo rideva e rideva, mentre il mio piede ancor 
tremava e palpitava il mio cuore; ‘ma questa è 
la patria di tutti i vasi di colore” — dissi a me 
stesso>>. 

F. NIETZCHE 


Strumenti 


Ed eccoci arrivati nel campo delle 
Utility che sicuramente vì aiuteranno 
nel vostro rapporto quotidiano con A- 
miga. DIRUTILITY è il programma che 
fa sicuramente al caso vostro. Quante 


volte vi siete ritrovati a riorganizzare il 
vostro archivio su disco e avete dovuto 
rinunciarvi, o perlomeno sospenderlo, 
a causa della lunga e noiosa scrittura 
di interminabili righe di comandi CLI?? 
Abbiamo pensato di farvi un favore nel 
proporvi questo comodo strumento di 
lavoro che vi faciliterà enormemente 
nella manipolazione dei dischetti. 


Istruzioni 


Prima di poter iniziare un qualsiasi 
processo, selezionate il file o la dire- 
ctory nella finestra che appare sulla 
sinistra dello schermo. Per prendere 
dimestichezza con il programma vi 
consigliamo di adoperare una copia di 
qualunque dischetto di lavoro. Per e- 
seguire un qualsiasi comando dovete 
quindi clickare uno dei numerosi ga- 
dget che appaiono sulla destra. Nella 
parte inferiore della finestra trovate 
tre righe riservate alle varie stringhe 
di commento. Esse sono: 

S: La directory corrente. Qui potete 
inserire un qualsiasi path (percorso) 
per arrivare al file o alla directory che 
vì interessa, ma normalmente non si 
usa in quanto tutte queste operazioni 
sono possibili usando il mouse nella fi- 
nestra delle directory. 

D: Il gadget di destinazione. Questo 
spazio è riservato per comunicare le 
directory di destinazione e viene ado- 
perato anche per creare nuove dire- 
ctory. 

Terza riga: Qui viene comunicato lo 
stato della finestra. Descrizione degli 
errorì e relativo numero dell'errore 
nel DOS. Non provate ad inserire del 
testo in questa riga in quanto è impos- 
sibile, perlomeno in questo mondo. 

DFO: DF1: DF2: RAM: HD0: —> 

Setta la directory corrente al root 
della device selezionata. 


ALL > 

Seleziona tutti i file della directory 
corrente, compresi quelli non visibili 
nella finestra. 


CLEAR > 
Annulla la selezione di tutti i file pre- 
selezionati. 


COPY —> 

Copia i file selezionati nella dire- 
ctory visualizzata nella riga di com- 
mento D. Ricordate? Qui non potete 
inserire nomi dì file ma solo path di di- 
rectory già esistenti. Sarete in grado di 
inserire i path relativi alla directory 
corrente. 
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DELETE —> 
Cancella i file selezionati. Non can- 
cella le directory. 


RENAME —> 

Scambia il nome al primo file sele- 
zionato, o directory, con il nome o path 
(nella stessa device) che sì trova nella 
riga D. 


GETDIR —> 

Se volete passare ad una nuova di- 
rectory, selezionatela nella finestra 
sulla sinistra e quindi clickate questo 
gadget. Non usate questo comando 
per una directory che già è scritta nel- 
la prima riga di commento S:!! Se la 
dovete scrivere premete Return quan- 
do siete dentro la riga di commento, 
da quel momento quella sarà la nuova 
directory corrente. 


MAKEDIR —> 

Questo comando crea la directory 
descritta nella seconda riga dì com- 
mento (D:), ovviamente potete usare i 
path necessari. 


DELETEDIR —> 

Questo comando cancella le dire- 
ctory vuote selezionate, se tentate di 
cancellare una directory con un qual- 
che contenuto vi comparirà un mes- 
saggio di errore. 


PARENT —> 
Và alla parent directory. 


ROOT —> 
Sì porta al root della device corren- 
te. 


TYPE —> 

Potete usare questo gadget per leg- 
gere ì vari file in formato ASCII. Sele- 
zionate ì file che vi interessano e quindi 
clickate TYPE. Una nuova finestra vie- 
ne aperta con il nome del file da voi 
scelto. Per avanzare di una pagina pre- 
mete la barra spaziatrice, per far scrol- 
lare lo schermo di una sola riga pre- 
mete Return mentre per portarvi alla 
fine del file usate il tasto ESC. Se avete 
selezionato più di un file il prossimo 
verrà automaticamente visualizzato. 
Dopo aver letto tutti ì file prescelti que- 
sta finestra viene chiusa e si ritorna alla 
schermata iniziale. 


SINFO —> 

Viene usato per vedere il numero di 
byte disponibili del device apparte- 
nente alla directory corrente (S). 


DINFO —> 
Viene usato per vedere il numero di 
byte disponibili del device apparte- 
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nente alla directory di destinazione 
(D). 


PRINT —> 

Funziona allo stesso modo di TYPE 
solo che l'output è indirizzato alla stam- 
pante. 


SWAP > 
Si usa per scambiare il contenuto di 
S con D. 


BYTE —> 

Somma i byte dei file selezionati e 
visualizza il risultato ed il numero dei 
file. 


EXEC —> 

Esegue i file selezionati dall'interno 
di DirUtility. Se DirUtility è stato chia- 
mato da CLI allora tutti gli output del 
programma saranno diretti al CLI rì- 
chiamato. 


SHOWILBM —> 

Per rendere esecutivo questo ga- 
dget dovete possedere un qualsiasi 
programma in grado di visualizzare 
delle immagini, (vedi SeeILBM nella 
directory Grafica) e depositarlo nel di- 
schetto che vi interessa, a questo punto 
DirUtility prova a copiare un comando 
di SHOW nella ram disk da SYS:C e 
quindi lo protegge, per evitare delle 
cancellazioni accidentali. A questo 
punto verrà dato l'execute per la vi- 
sualizzazione dei file selezionati. Per 
passare da un'immagine all'altra ba- 
sterà posizionarsi nell'angolo alto sini- 
stro dello schermo e premere il tasto 
del mouse. Se SYS:C/SHOW non esi- 
ste il gadget SHOW rimane inutilizza- 
bile. 


NOTE AGGIUNTIVE 

Se per caso avete selezionato tutti ì 
file e quindi avete dato il DELETE e vi 
accorgete di aver commesso un'enor- 
me sciocchezza, potete interrompere 
il processo clickando all'interno della 
finestra dì visualizzazione della dire- 
ctory. 

In omaggio vi offriamo una simpatica 
lente di ingrandimento che vi farà sen- 
tire alla stregua del famoso Sherlock 
Holmes. Caricando il programma 
'Lente' potrete esaminare minuziosa- 
mente ì dettagli più nascosti delle fi- 
nestre della schermata Workbench. 
La finestra del programma può essere 
dimensionata a piacimento e sulla par- 
te destra, ci sono deì gadget. Posizio- 
natevi con il mouse sotto i gadget dì 
sfogliamento delle finestre e premete 
ripetutamente il tasto sinistro del mou- 
se e noterete che i dettagli dello scher 


DISK 


mo Workbench racchiusi nella finestra 
ingrandiscono ad ogni click. Per ritor- 
nare alla situazione iniziale posizionate 
il cursore un po' più su del gadget di 
dimensionamento e premete ripetuta- 
mente il tasto selezione del mouse. 
Certamente non è un programma di 
grande utilità ma può essere piacevole 
passare qualche minuto da segugi alla 
ricerca di indizi nelle varie finestre a- 
perte con il Workbench. Se trovate 
qualcosa di interessante vi preghiamo 
di comunicarcelo al più presto. 
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Il nostro viaggio si sta concludendo 
ma prima di lasciarci vogliamo spen- 
dere ancora qualche commento sulla 
parte Magazine. Quelli che già ciì co- 
noscono certamente saranno già anda- 
ti a curiosare all'interno per trovare i 
programmi contenuti nella rivista. E 
sì?? È proprio così, in Magazine trove- 
rete tutti i listati sorgente riguardanti i 
vari articoli della rivista. Comunque, 
cari pigroni, siamo ben lieti di tenere 
tutta per noi la fatica della trascrizione, 
poiché vogliamo darvi il massimo e 
con il minimo sforzo, da parte vostra. 


La separazione 


Dopo questo viaggio all'interno di 
questa giungla dì programmi ci sentia- 
mo veramente stanchi, ma voi che in- 
vece avete ancora tutto il tempo per 
goderveli non esitate e spendete qual- 
che ora con il vostro Amiga per fargli 
conoscere tutti ì più nascosti meandri 
dì questo dischetto, vedrete che saprà 
ricompensarvi adeguatamente. 

Un celebre personaggio, non molto 
amato, diceva: ” Chi si ferma è per- 
duto! ” Noi siamo ben distanti da quel- 
la persona ma ammettiamo che non 
siamo minimamente disposti a fermar- 
ci. Il numero tre di Amiga Magazine è 
già in cantiere, abbiate solo un po' di 
pazienza!! 


<<E per cagion sua e dei suoi pari io devo dar 
compimento a me stesso: perciò ora fuggo la 
felicità e mi offro volentieri alla sventura — 
perché sia questa la mia ultima prova e l'ultima 
mia esperienza. 

E in vero, era tempo che io me ne andassi; e 
l'ombra del viandante e il più lungo dei momenti 
e l'ora più silenziosa mi dicevan concordi: ”’ è 
proprio tempo! ”. 

F. Nietzsche 


53 





cienza 





piso 


UNDICI STRUMENTI 


PREZIOSI 
PER UN RAPIDO 


ACCESSO ALLA 
CONOSCENZA 


BIOLOGIA 


Cod. DSS29 pp 416 L 14000 


Le varie branche della Biologia 
(botanica, zoologia, biochimica 
fisiologia, immunologia e gene- 
tica) sono | temi di quest'opera 
che rivolge particolare attenzio- 
ne anche ai più recenti nsultati 
della biologia molecolare. Sono 
inoltre trattati anche | concetti 
delle discipline biomediche 
quali patologia, istologia. farma- 
cologia, microbiologia 


INFORMATICA 

Cod DSS31 pp 288 L 14.000 
Un acronimo di difficile com 
prensione, 1 piu recenti traquar- 
di raggiunti dall'Intelligenza Arti- 
ficiale, la struttura di un perso- 
nal computer. Domande ricor- 
renti per chi vuole conoscere 
una disciplina giovane che, nello 
spazio di pochi anni, ha cambia- 
to il modo di produrre il nostro 
lavoro 


CHIMICA 


Cod DS526 pp 304 L 14000 


Quante volte ci siamo trovati 
nella necessità non solo di veri- 
ficare una formula complessa 
ma anche di conoscere un con- 
cetto di chimica generale, inor- 
ganica, analitica inquadrato in 
un contesto scientifico più am- 
pio? Questo dizionario ti aiuterà 
passo a passo nella conoscenza 
cella Chimica 





FISICA 
Cod 0S498 pp 272 L 14000 
A molti sono forse noti gli 


straordinari risultati delle mo- 
derne ncerche della fisica nu- 
cleare e di quella delle particelle 
Ma non altrettanto noti sono 
probabilmente i concetti di base 
della fisica moderna che hanno 
permesso di raggiungere questi 
importanti traguardi. || diziona- 
no di Fisica ti aiutera a cono 
scerli 


MATEMATICA 

Cod DS499 pp 296 14 000 
Il dizionario di Matematica arute 
ra non solo a chiarire e rinfre 
scare concetti magari gia not 
ma anche a conoscere | pro- 
gressi di questa materia che 
certamente pari a quelli di altre 
discipline e non solo di carattere 
teorico. stanno assumendo 


un importanza crescente nei più 
svariati settori applicativi 









MECCANICA 


Cod DSS30 pp 24 L 1400 


Funzionamento dei meccanism 
loro progettazione e ventfica 
processi di produzione delle le 
ghe. studio delle tecnologie per 
a lavorazione dei materiali. prin 
cipi e mezzi per produrre ener 
gia, come sono realizzati gi 
strumenti per la nievazione d 
grandezze meccaniche o fisiche 
Ecco alcuni temi del dizionario 
di Meccanica 


ELETTRONICA 


Cod DS524 pg 


Il rapido sviluppo tecnologico d 
questi anni e sovente causa del 

obsolescenza non solo di com 
ponenti e sistemi elettronici, ma 
anche di concetti, documenta- 
zione e libri che trattano questa 
disciplina Una delle funzioni d 
questo dizionanio e quella di for 
nire un valido sussidio per rima 
nere sempre aggiornati 


384 LL 14000 


I DIZIONARI J 


= 7 dizionari 


enciclopedici 


RAGIONERIA 
GENERALE 


Cod 0S527 pp 304 L 14000 
Sempre piu rilevante € il ruolo 
che sta assumento la Ragioneria 
sia nelle scuole. sia nelle azien 

de. sta infine nella formazione 
professionale |l primo diziona- 
no, dedicato alla Ragioneria Ge 

nerale. comprende la spiegazio 

ne dei concetti di base dei siste- 
mi e dei metodi contabili ed € 
arncchito dalla terminologia re 

ativa alle societa 


GEOLOGIA 


Cod DSS22 pp 


88 L 14000 
Sopresti collocare termini come 
magnetudo. evaporite. cratone 
faglia nel contesto della natura 
che ci circonda? Questi e altri 
1200 termini sono spiegati nel 
dizionanto di Geologia che utiliz- 
za un completo sistema di ni 
mandi per agevolare il lettore 
nella conoscenza e nell appro 
fondimento della materia 


NELLE MIGLIORI LIBRERIE 


RAGIONERIA 
APPLICATA 


Cod DS528 pp 288 L 14000 
Il secondo dizionario è dedicato 
alla Ragioneria Applicata ed in- 
clude | concetti e le spiegazioni 
utili per lo studente. il professio- 
nista e per chi opera nelle im- 
prese mercantili, industriali 
bancarie. assicurative. Termini 
di contabilita degli enti pubbîlici 
termini impiegati nelle analisi € 
nella formazione del bilancio 
completano la struttura dell'ope- 
ra 


ASTRONOMIA 


Cod DSS25 pp 304 14 000 


E esplosa una supernova nella 
Grande Nube di Magellano. Ma 
dov'è la Grande Nube e cos'è 
una supernova? Sono queste le 
domande che ci poniamo quan- 
do il cielo fa notizia sui quotidia- 
ni 0 nei notiziari televisivi e alle 
quali potremo trovare risposta in 
questo dizionario 





Per acquistare libri Jackson rivolgetevi alle migliori librerie e negozi di informatica oppure utilizzate l'apposito tagliando riportato in fondo alla rivista. 


LINGUAGGI 


CAPIRE E PILOTARE 
IL SUONO DI AMIGA 








Forth £ 





di Mr. Lambda 


Disporre nel dispositivo audio di Amiga 
per capire come questo straordinario au- 
dio device lavori, e quindi sfruttare la ca- 
pacità manipolatoria del Forth per creare 

Ecco l'occasione per trasformare un in- 
contro in un avvenimento determinante. E 
noi non vogliamo perderla. Come avrete 
già capito inizieremo subito Forth...issimo, 
ma siate sempre pronti al peggio. In ogni 
senso. Il Forth, infatti, è un linguaggio che 
offre, come pochi, ampie capacità di ma- 
nipolazione e interattività, ma richiede pu- 
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Ovvero il suono tra le dita 


re, come pochi, spiccate doti di creatività 
Qualsiasi cosa si voglia, bisogna essere 
innanzitutto capaci di progettarsela e rea- 
lizzarsela da sè. Il programma che accom- 
pagna questo articolo è una valida dimo- 
strazione di ciò. Insomma, la programma- 
zione all'insegna dell'inventività e del bri- 
colage. Ma credeteci, si può arrivare dav 
vero molto lontano. E intanto incomince- 
remo dal suono 

Il metodo della riproduzione del suono 
utilizzato da Amiga è simile a quello utiliz- 


zato dai Compact Disc che molti di voi or- 
mai possiederanno. Anche se l'audio di 
Amiga non può essere paragonato con la 
fedeltà dei CD, la qualità del suono che 
può produrre risulta comunque impressio- 
nante. Ciò che limita le prestazioni di A- 
miga, se lo paragoniamo con il Compact 
Disc, è la frequenza di campionamento e 
il numero di bit a disposizione per cam- 
pione. Infatti un disco digitale ha una ri- 
sposta in frequenza che raggiunge i 20 
kilohertz, mentre l’Amiga è limitato teori- 
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camente a circa 14 kilohertz, e pratica- 
mente consente una riproduzione corretta 
fino a 7,5 kilohertz cioè alla metà della ci- 
fra teorica precedente. Inoltre, come si di- 
ceva, un Compact Disc utilizza più bit per 
rappresentare ciascun punto della forma 
d'onda campionata e quindi ha un più 
ampio spettro dinamico. 

Vediamo ora come l'Amiga produca ef- 
fettivamente un suono. Innanzituto il suono 
che deve venire riprodotto deve essere 
definito come una serie di numeri che rap- 
presentano il livello di voltaggio della forma 
d'onda campionata a determinati intervalli. 
| diversi voltaggi rappresentati da quei nu- 
meri devono quindi essere filtrati, amplifi- 
cati, e inviati a uno o più altoparlanti per 
produrre finalmente il suono desiderato. In 
questa maniera è possibile creare qualsia- 
si suono concepibile e inconcepibile all’in- 
terno, naturalmente, dei limiti imposti dalla 
frequenza a cui la forma d'onda può ve- 
nire campionata, che ne determinerà la ri- 
sposta in frequenza, con il numero di bit 
disponibili per ciascun campione, che ne 
determinerà la quantità di rumore nel se- 
gnale e la dinamica, e, infine, con la me- 
moria che abbiamo a disposizione. 

Naturalmente per una più dettagliata 
comprensione della produzione del suono 
in Amiga vi suggeriamo di consultare la 
sezione riguardante l'audio nell’HARDWA- 
RE REFERENCE MANUAL. 


Come tutto è iniziato... 


Innanzitutto precisiamo che per la scrit- 
tura e il collaudo del programma che vi 
andiamo a presentare abbiamo utilizzato 
il Multi-Forth della Creative Solutions per- 
ché più facilmente reperibile e più com- 
pleto. Le versioni più recenti di questo pro- 
dotto, tra le altre meraviglie, supportano 
anche un driver audio, rendendo quindi il 
tutto ancor più appetibile. Ma il Multi-Forth 
in nostro possesso, che è di gran lunga 
una versione più antica, per l'audio di A- 
miga non supporta alcunché. Ci siamo de- 
cisi a presentarvi questo programma in- 
nanzitutto perché rappresenta comunque 
un'ottimo esempio di applicazione del For- 
th alla soluzione di un problema fonda- 
mentale come quello del suono in Amiga 
e ne traccia in modo chiaro i passaggi e 
le possibilità permettendovi i più ampi svi- 
luppi e miglioramenti, ma soprattutto per- 
ché non sarete certamente in molti a pos- 
sedere le più recenti versioni del Multi- 
Forth e morirete, come noi, dalla voglia di 
poter controllare il suono di Amiga subito. 
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E veniamo ai fatti. 

Dobbiamo incominciare con l'ammette- 
re che realizzare il programma non è stato 
semplice e immediato come ci aspettava- 
mo, ma eccovi il resoconto della nostra 
avventura. 

Come ormai sapete, il nostro Multi-Forth 
non supportava alcunché per l'audio e non 
c'era alcun esempio nel manuale che ci 
potesse assistere. Insomma, possiamo di- 
chiarare che non una parola del vocabo- 
lario a disposizione ci permetteva di fare 
alcunché con il suono! Ma questo è Forth! 
E se qualcosa vi è necessario, dovete co- 
struirvela, diciamo bene? 

Quasi subito fummo in grado di capire 
che avevamo bisogno di una funzione 
chiamata nei manuali BeginiO. | manuali 
indicavano anche che la funzione si aspet- 
tava come argomento l'indirizzo di una 
struttura IORequest. Ma nulla di tutto que- 
sto esisteva nel nostro Multi-Forth. E a nulla 
sono servite le ricerche dettagliate nel no- 
stro manuale Multi-Forth: non c’era nulla, 
neanche qualcosa che potesse richiamare 
indirettamente questo concetto. La cosa 
che più ci ispirava era la funzione CalllO, 
ma questa non era chiaramente documen. 
tata, anzi non era documentata affatto, se 
non per una breve menzione nel glossa- 
rio del manuale. Prima di incazzarci defi- 
nitivamente con il nostro Multi-Forth, ab- 
biamo considerato il fatto che non c'era 
alcuna documentazione sulla funzione Be- 
giniO nemmeno negli AMIGA REFEREN- 
CE MANUAL. Il solo riferimento che ave- 
vamo potuto trovare era nella appendice 
B dello EXEC MANUAL. Esso consisteva 
semplicemente in questa macro in linguag- 
gio assembler: 


_ BeginiO: 
move.l 4(sp),a1 
BEGINIO 
ris 


Ma non ci è stata di molto aiuto. 

Per farla breve abbiamo contattato tutti 
coloro che sembravano disposti a darci 
una mano e alla fine abbiamo deciso che 
il solo modo di risolvere questo problema 
era di arrangiarsi. 

Ci siamo procurati una copia di Meta- 
scope — il debugger simbolico della Me- 
tadign — e un compilatore C, abbiamo 
compilato un programma demo che ri- 
guardava l'audio di Amiga, e quindi ab- 
biamo incominciato a curiosare. Quasi im- 
mediatamente abbiamo individuato la fa- 
migarata funzione BeginlO e l'abbiamo di- 
sassemblata. Eccola: 


_— BeginiO: 
movea.l 4(a7),a1 
move.l a6,-(a7) 


movea.l $14(a1),a6 
jsr $-1E(a6) 
movea.l (a7)+,a6 
rts 


Quando assegnamo come parametro 
l'indirizzo di una struttura IORequest, la 
funzione BeginiO dapprima preleva da 
quella struttura un puntatore a un device 
node, cioè ad un nodo del dispositivo so- 
ftware dell'audio, quindi utilizza quel pun- 
tatore come offset alla base di una jump 
table o tavola di salti nella memoria bassa 
e finalmente da là salta al ROM Kernel. Che 
cosa ci potrebbe essere di più semplice, 
eh? 

Una delle difficoltà che si possono in- 
contrare nella traduzione di routine in Forth 
risiede nel differente modo in cui C e Forth 
passano i parametri. Perché tutto funzioni 
a dovere in Multi-Forth, la prima istruzione 
deve infatti essere: 


movea.l (a7)+,a1 


che muove l'indirizzo della struttura IORe- 
quest dallo stack dati del Multi-Forth (A7 
è lo stack pointer) nel registro A1. E an- 
cora lo RTS deve essere sostituito da: 


move.w (a2)+,d3 
jmp $18(a6,d3.w) 


che è la macro per il NEXT in Multi-Forth. 

Nel listato che accompagna questo ar- 
ticolo voi troverete un'altra definizione CO- 
DE per la funzione NewList. Naturalmente 
è possibile scrivere questa funzione anche 
direttamente in Forth, ma non ci siamo 
potuti trattenere dalla tentazione di conti- 
nuare il lavoro iniziato con BeginlO! Per 
evitarvi la fatica di caricare l'assembler vi 
proponiamo una versione delle due word 
che inserisce i valori in codice macchina 
esadecimale direttamente nel vostro dizio- 
nario. 

Ma a questo punto, era anche neces- 
sario implementare la chiamata OpenDe- 
vice della libreria Exec (che, per fortuna, 
è documentata nella nostra versione di 
Multi-Forth) per poter fornire a BeginlO un 
puntatore al device node. L’implementa- 
zione delle altre chiamate Exec è stata più 
semplice, e non si sono incontrati grossi 
problemi. 

Un altro lavoro preparatorio riguardava 
la definizione delle strutture dati richieste 
dal device audio. Vediamone dapprima la 
versione in C e la versione in Assembler 
che ne danno i manuali e quindi la tradu- 
zione che ne abbiamo fatto in Forth. Vi 
facciamo presente che le recenti versioni 
del Multi-Forth includono tutte le strutture 
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disponibili presentate dai AMIGA REFE- 
RENCE MANUAL, ma la versione in no- 
stro possesso invece non ci metteva a di- 
sposizione le strutture che intendiamo pre- 
sentarvi e quindi ci costringeva ancora una 
volta a cimentarci con la nostra capacità 
di risolvere anche questo problema. Ma 
come abbiamo già avuto modo di vedere 
questo è proprio lo spirito del Forth. 

Incominciamo con la struttura Message 
in C: 


struct Message 

f 

t 

struct Node mn__Node; 

struct MsgPort *mn__ReplyPort; 


UWORD mn_ Length; 
Ì 


} 


E ora vediamone la versione in Assem- 
bler: 


STRUCTUREMN,LN__SIZE 
APTR = MN_REPLYPORT 
UWORD MN__LENGTH 
LABEL MN__SIZE 


E finalmente presentiamo la nostra ver- 
sione in Forth: 


structure Message 
LinkNode struct: +mnNode 
ptr: + mnReplyPort 
short: +mnLength 
Structure.end 


E ora interessiamoci della struttura IO- 
Request, che, come potrete vedere, pre- 
senta delle particolarità. Innanzitutto pre- 
sentiamo le due strutture utilizzabili in C: 


struct IORequest 

{ 

struct Message io__Message; 
struct Device *io__Device; 
struct Unit *io__Unit; 
UWORD io__Command; 
UBYTE io_ Flags; 

BYTE io_Error 


struct IOStdReq 
{ 


struct Message io__Message; 
struct Device *io__Device; 
struct Unit *io_Unit; 
UWORD io__Command; 
UBYTE io__Flags; 

BYTE io_eError; 

ULONG io_ Actual; 

ULONG io__Length; 

APTR  io_Data; 

ULONG io__Offset; 


ì 
) 


E ora vediamo come queste strutture 
vengano tradotte in Assembler, conside- 
rando semplicemente la struttura IORe- 


AMIGA magazine 


L 


quest un sottoinsieme della struttura IO- 
StdReq: 


STRUCTURE IO, MN__SIZE 
APTR IO__DEVICE 
APTR IO__UNIT 
UWORD —IO_COMMAND 
UBYTE IO_FLAGS 
BYTE IO__ERROR 
LABEL IO__SIZE 
ULONG IO__ACTUAL 
ULONG IO__LENGTH 
APTR IO__DATA 
ULONG IO__OFFSET 
LABEL IOSTD__SIZE 


Per adeguare queste strutture al Forth 
si adotta il medesimo concetto visto nella 
precedente traduzione Assembler anche 
se la sintassi chiaramente ne differisce: 


structure IOStdReq 
structure IORequest 
Message struct: + ioMessage 
ptr: + inDevice 
ptr: + ioUnit 
short: + ioCommand 
byte: + ioFlags 
byte: + ioError 
IORequest + 
long: + ioActual 
long: + ioLength 
pîr: + ioData 
long: + ioOffset 
structure.end 


Consideriamo brevemente il costituirsi 
di questa struttura e la soluzione program- 
mativa che le permette di operare corret- 
tamente. La word STRUCTURE crea una 
nuova word, fondamentalmente una co- 
stante, e lascia l'indirizzo del campo pa- 
rametri (parameter field) di quella word e 
uno zero nello stack. Lo zero è un valore 
fittizio in cui viene accumulata la dimen- 
sione della struttura. Quando STRUCTU- 
RE.END viene incontrata la dimensione 
accumulata della struttura viene memoriz- 
zata all'indirizzo del campo parametri della 
word. Come risultato di queste operazioni, 
quando viene eseguito il nome della strut- 
tura, ne viene restituita la dimensione. Dal 
momento che il nome della struttura ritorna 
la sua dimensione, l'inserzione di ' IORe- 
quest + ' alla fine della struttura IORequest 
aggiunge l'offset appropriato perché 
+ioActual venga eseguita correttamente. 

E finalmente consideriamo il template 
della struttura dati utilizzata dal device au- 
dio (audio.device). Essa include una strut- 
tura IORequest seguita da informazioni ri- 
guardanti la locazione e la lunghezza della 
tavola dati del suono, il periodo e il volume 
della forma d'onda e il numero di volte che 


structure.end 
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il suono deve essere ripetuto. Incomincia- 
mo considerandone la struttura in C: 


struct Audio 

{ 
struct 
WORD 
UBYTE 
ULONG 
UWORD 
UWORD 
UWORD 
struct 


IORequest ioa__Request; 
ioa__AllocKey; 
*ioa__Data; 

ioa_Length; 
ioa__Period; 
ioa__Volume; 
ioa__Cycles; 

Message ioa__WriteMsg; 


Ecco la versione in sintassi Assembler: 
STRUCTURE Audio,I0__SIZE 


WORD  ioa_AllocKey 

APTR ioa__Data 

ULONG ioa_Length 

UWORD  ioa_ Period 

UWORD  ioa_ Volume 

UWORD  ioa__Cycles 

STRUCT ioa_WriteMsg,MN__SIZE 
LABEL —ioa_SIZEOF 


E quella in Multi-Forth: 


structure IOAudio 
IORequest struct: + inaRequest 
short: + inaAllocKey 
ptr: + ioaData 
long: + ioaLength 
short: + ioaPeriod 
short: + ioaVolume 
short: + iaCycles 
Message struct: + iaWriteMsg 
structure.end 


Tutte le costanti che sono comandi del 
device e che trovate nel listato sono spie- 
gate dettagliatamente negli AMIGA REFE- 
RENCE MANUAL. 

Vi abbiamo messo a disposizione, tra- 
ducendole in sintassi Forth, le funzioni 
CreatePort() e DeletePort() che sono di- 
sponibili in C e che si rivelerrano molto utili. 
CreatePort richiede e inizializza una mes- 
sage port che vi mette a disposizione un 
meccanismo per la comunicazione tra dif- 
ferenti task e interrupt. Una porta puo' es- 
sere sia pubblica, cioè con un nome e co- 
nosciuta al resto del sistema sistema: 


0” nome” priorità CreatePort 


Oppure privata, e cioè senza nome e 
non conosciuta al resto del sistema: 


0 priorità CreatePort 


Nel caso dell'audio device noi abbiamo 
utilizzato una porta privata e senza nome 
dal momento che nessun altro task nel si- 
stema aveva necessità di sapere della sua 
esistenza. 

Noi ci scusiamo fin d'ora se non riusci- 
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remo a soddisfare ogni vostro dubbio, ma 
il metodo migliore per comprendere a fon- 
do questo nostro programma è studiarlo 
consultando opportunamente gli AMIGA 
REFERENCE MANUAL. E non trascurate 
lo EXEC REFERENCE MANUAL anche se 
all'inizio vi può sembrare ostico e difficile 
de comprendere. Noi abbiamo trovato il 
manuale veramente chiaro sotto molti pun- 
ti di vista, anche se naturalmente neces- 
sita di essere letto molte volte per riuscire 
ad afferrare alcuni punti più complessi. A 
ogni successiva lettura ci siamo accorti 
che ogni cosa ci riusciva più chiara e con- 
seguente. 


Ed è diventato suono 


Il listato che vi presentiamo vi permette 
di generare semplici forme d'onda all'in- 
terno di un limitato ambito di frequenze. 
Vi forniamo le tavole dei dati per l'onda 
sinusoidale (Sine), l'onda quadra (Square), 
l'onda triangolare (Triangle) e l'onda a 
dente di sega (Sawtooth) che possono pro- 
durre buoni risultati tra i 1200 e i 2400 Hz. 
Anche frequenze tra 600 e 1200 Hz pos- 
sono essere riprodotte con buoni risultati 
anche se ciò non è strettamente in accordo 
con quanto enunciato nel manuale dello 
Hardware. Le frequenze al di fuori di que- 


sti limiti produrranno suoni distintamente 
distorti. 

Ciascuna tavola di dati audio consiste 
di dodici campioni che descrivono un ci- 
clo completo. Le frequenze più basse ri- 
chiederebbero una tavola di dati più lunga, 
e le frequenze più alte meno campioni. Per 
creare un suono continuo basta che pun- 
tiate il DMA audio alla tavola dei dati del- 
l'onda e gli comunichiate quante volte de- 
siderate ripeta i dati. Un ciclo è sufficiente 
per generare un suono continuo. Il DMA 
si riposiziona automaticamente all’inizio 
dell'array dei dati ogni volta che raggiunge 
la sua fine e ripete questa operazione fino 
a quando ha riletto l'array per il numero 
di volte che avete specificato. 

E adesso vi diamo alcune spiegazioni 
che riguardano la word Hz. Il manuale 
dello Hardware indica un metodo per de- 
terminare adeguatamente la frequenza di 
campionamento necessaria a produrre 
una data frequenza da un precostituito nu- 
mero di campioni che noi chiaramente non 
abbiamo seguito. Questo metodo è basato 
sul periodo del timer audio e il periodo 
della frequenza desiderata, ma è molto più 
semplice utilizzare le frequenze per ese- 
guire i calcoli necessari in modo da evi- 
tare reciproci o calcoli con virgola mobile. 
Ecco l'equazione: 


Frequenza__di__Campionamento = 
AudioClock / (Frequenza__Desiderata 
* Campioni) 


Dove Frequenza__di__Campiona- 
mento è il numero di tick che il clock del- 
l'audio deve aspettare prima di prelevare 
un campione, la frequenza di AudioClock 
è 3,579546 Mhz, e Campioni è il numero 
di campioni che devono essere riprodotti 
in un periodo della forma d'onda. 

La word Hz calcola il periodo richiesto 
per generare una determinata frequenza 
da una tavola di dodici campioni e me- 
morizza quel valore in una variabile chia- 
mata Period per servirsene successiva- 
mente. 

Ora parleremo delle altre word descri- 
vendo l’azione della word Wave. La prima 
cosa che Wave fa è tentare di aprire una 
port audio. La word AudioPort? ci restitui- 
sce l'indirizzo della port allocata dalla word 
CreatePort, se, naturalmente questa ha 
successo, e il flag O se questa non ha 
successo. Se il tentativo di creare una mes- 
sage port non ha successo Wave termina 
con il messaggio ‘La port del device au- 
dio non è stata aperta. ” 

Se la message port è stata aperta con 
successo Wave continua inizializzando 
dapprima la struttura inaRequest della 
struttura IOAudio sound con i valori richie- 
sti dalla chiamata di sistema OpenDevice. 


rl 
s 
fa \ 
" \ 
AudioDemo LS \ 
" \ 
| CREATE 
anew AudioDemo 7 
di 2069 
Ecco il codice Assembler di cui lE sno 
abbiamo bisogno per includere DS 
le funzioni BeginIO e NewList ha \ 
nei nostri programmi. Ti \ SP") 
dl 
CODE BeginIO ( IORequest -- ) È \  AO( 
SP )+ A1 LONG MOVEA, da \ 
AG6 A? -) LONG MOVE, è: \ 
20 A1 I) A6 LONG MOVEA, 3 \ 
. 


-30 A6 I) USA, 
A? )+ AG LONG MOVEA, 
NEXT END-CODE 


ai 
Let 





e per evitarvi la fatica 
di caricare l’Assembler, 


eccovi una versione 
alternativa. 






BeginIO ( IORequest -- ) 
-4 ALLOT 225F 


w, 2FOE w, 
w, 0014 w, 4EAE w, 
Wi 2C5F w, ZI617A w, 
w, 3018 w, 


CODE NewList ( list -- ) 


+ AO LONG MOVEA, 


AO AO () LONG MOVE, 


) 04 LONG ADDA, 


4 AO I) LONG CLA, 
AO 8 AO I) LONG MOVE, 
NEXT END-CODE 


CREATE NewList ( list -- ) 
-4 ALLOT 205F w, 2088 w, 
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5890 w, 42A8 w, 0004 w, 
2148 w, 0008 w, 361A w, 


4EF6 w, 3018 w, 
DECIMAL 


AllocMem 

( dimensione _ in _byte\caratteristiche 
-- blocco di memoria ) 
!di !d0 exec@® 33 ; 


FreeMem 

( blocco di memoria\dimensione_in byte 
-- ) 
Id0 1al exec 35 ; 


AllocSignal 
( num segnale -- num segnale ) 
!d0 exec@ 55 ; 


FreeSignal ( mum segnale -- ) 
!d0 exec 56 ; 


AddPort ( port -- ) 
!a1 exec S9 ; 


RemPort ( port -- ) 
lat exec 60 ; 


OpenDevice 

( nome dev\unita"\ioRequest\flag 
-- errore ) 
!d1 !a1 !d0 !a0 exec@ 74 ; 





AMIGA magazine 


CloseDevice ( ioRequest -- ) 
lat aree 75: 


WaitIO ( ioRequest -- error ) 
1a? exec@ 79 ; 


SYMTABLE DEFINITIONS 
4 wconstant NT MSGPORT 
O wconstant PA _ SIGNAL 
structure Message 
LinkNode struct: +mnNode 
ptr: +mnReplyPort 


short: +mnLength 
structure.end 


1 0 scale wconstant MEMF_ PUBLIC 
1 16 scale constant MEMF_ CLEAR 


\ osservate bene ora un esempio 
\ di struttura nidificata 


structure IOStdReq 
structure IORequest 
Message struct: +ioMessage 

ptr: +ioDevice 
ptr: +ioUnit 

short: +ioCommand 

byte: +ioFlags 
byte: +ioError 
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structure.end IORequest + 
‘long: +ioActual 
long: +ioLength 
ptr: +ioData 
long: +io0ffset 
structure.end 


1 wconstant IOF_QUICK 
3 wconstant CMD_ WRITE 
0" audio.device" constant AUDIONAME 
1 4 scale wconstant ADIOF PERVOL 
structure IDAudio 
IORequest struct: +ioaRequest 
short: +ioaAllocKey 
ptr: +ioaData 
long: +ioaLength 
short: +ioaPeriod 
short: +ioaVolume 
short: +ioaCycles 
Message struct: +ioaWriteMsg 
structure.end 


FORTH DEFINITIONS 


Il formato adeguato per creare 
una port senza nome e quindi 
privata e’: 

O pri CreatePort 


: CreatePort ( 0" nome"\pri -- 
MsgPort oppure 0 ) 
LOCALSI pri name | 
-1 AllocSignal 


controlliamo innanzitutto se 
abbiamo ottenuto un bit per il 
segnale 


dup -1 = not 


\ e’ gia’ allocata la memoria per la 
\ nostra port ? Se no, facciamolo 


IF MessagePort 
MEMF_CLEAR MEMF_ PUBLIC OR 
AllocMem dup 0= 


abituale controllo sul risultato 
dell’ allocazione 

in caso di risultato negativo 
concludiamo inserendo nello stack 





\ uno zero o NULL 


IF DROP FreeSignal 0 


\ altrimenti ci decidiamo ad 
\ inizializzare la struttura 
\ MessagePort 


ELSE 
name over +mpLinkNode 
+lnName ! 
pri over +mpLinkNode 
+lnPPri C! 
NT_MSGPORT over +mpLinkNode 
+lnType C! 
PA_SIGNAL over +mpFlags C! 
swap over +mpSigBit C! 
O FindTask over +mpSigTask ! 
dup name 


\ se la port e’ ‘pubblica’, cioe’ 

\ ha un nome, AddPort permette al 

\ resto del sistema di individuarla 
\ e 0" name" FindPort ci restituira’ 
\ il suo indirizzo 


IF AddPort 

ELSE +mpLinkHeader NewList THEN 
THEN 

ELSE drop 0 

THEN ; 


DeletePort ( port -- ) 
LOCALSI port | 
port +mpLinkNode +lnName @ 
IF port RemPort 

THEN 
255 port +mpLinkNode +lnType C! 
-1 port +mpLinkHeader +lhHead ! 
port +mpSigBit C@ FreeSignal 
port MessagePort FreeMem ; 


struct IOAudio sound 
sound IDAudio ERASE 


DECIMAL 


CREATE ChannelMask 15 C, 

\ in questo modo potremo utilizzare 
\ tutti e quattro i canali 

\ disponibili 
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CREATE Samples 12, 
\ la lunghezza dei dati del suono 


CREATE Period 400 W, 

\ intervallo che intercorre tra 
\ un campione e il successivo 

\ in tick del timer 


CREATE Duration 400 W, 
\ numero di volte che vogliamo far 
\ ripetere il suono 


VARIABLE >Sound 
\ puntatore ai dati del suono 


:AudioData ( nome ( -- ) 
CREATE DOES> >Sound ! ; 


:AudioData Sine 
Oc; 6535580109; 
126 cc; 209 3o; + (6310; 
0; «64Va,=109:0; 
-126: 0, =1096073=B3-6;, 


Sine \ forma d’onda di default 


:AudioData Square 


80.0, ‘8005; 809.0, 
800, “80E6,; 80°, 
80.0, «BUG, “=B0'a, 
=80. c, -80 c, -80 c, 


:AudioData Triangle 
G..c, 42°. ‘94 6, 
126%, B4.c., ‘420, 
die, =40/c; “Bd; 
=126 0; =84c;, 42 6; 


:AudioData Sawtooth 
Ube: 25. e, (50 
592. 1A00.0),-(128 
1250: «=100..047-=25 
=50' 0, =25 GC, 0 


3579546 ( Hz ) CONSTANT AudioClock 
\ intervallo di frequenza del timer 


: Hz ( freq -- ) 


Samples @ * AudioClock swap / 
Period W! ; 
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Bit Ie € 


: FreeAudioPort ( -- ) 
sound +ioaAequest +ioMessage 
+mnReplyPort ® DeletePort ; 


: AudioPort? ( -- MsgPort oppure 0 ) 
O 0 CreatePort dup 
IF dup sound +ioaRequest 
+ioMessage +mnReplyPort ! 
THEN ; 


: AudioDevice? ( -- vero oppure falso ) 
AUDIONAME O sound 0 OpenDevice NOT ; 


initSoundPort ( -- ) 

10 sound +ioaARequest +ioMessage 
+mnNode +lnPpri C! 

ChannelMask sound +ioaData ! 

1 sound +ioaLength ! ; 


initSoundStruct ( -- }) 

CMD_WRITE sound +ioaRequest 
+ioCommand W! 

ADIOF_PERVOL IOF_QUICK or sound 
+ioaRequest +ioFlags C! 

>Sound @ sound +ioaData ! 
Duration W@® sound +iocaCycles W! 
Samples @ sound +ioalength |! 
Period W@ sound +ioaPeriod W! 
64 sound +ioaVolume W! 


>» 


: Wave ( -- ) 
AudioPort? 
IF initSoundPort 
AudioDevice? 
IF initSoundStruct 
sound BeginIO sound WaeitI0 
drop sound CloseDevice 
ELSE 
."Il device audio non e’ stato aperto." 
cr 
THEN FreeAudioPort 
ELSE 
." La port audio non e’ stata aperta. " 
THEN 


\ ed eccoci, finalmente, con un esempio) 
\ all’utilizzo del programma: | 
od 300 Hz Sine Wave 
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La priorità richiesta viene memorizzata nel 
campo +InPpri della struttura IOAudio. A 
proposito di +InPpri permetteteci un com- 
mento. Probabilmente a molti di voi sarà 
sembrato un errore o un refuso, dal mo- 
mento che si riferisce a LN__PRI della re- 
lativa struttura in Assembler oppure a 
In__Pri della relativa struttura in C, e invece 
è proprio così. Ma tant'è. E dal momento 
che così appare nella nostra versione di 
Multi-Forth, noi siamo stati costretti ad ac- 
cettarlo proprio così, nudo e crudo, e sba- 
gliato. Quindi per non perdere il controllo 
del vostro sistema nervoso per un errore 
che vi sembra sciocco e impossibile, date 
un'occhiata alla word relativa che è pre- 
sente nella vostra versione. Bene. E ora 
continuiamo. Si diceva della word Wave e 
delle sue successive inizializzazioni. Dopo 
la priorità, l'indirizzo di ChannelMask viene 
memorizzato nel campo +ioData, che ri- 
chiederà per noi al sistema tutti quattro i 
canali. La mask per la richiesta dei canali 
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consiste in un solo byte, e così +ioaLength 
viene settato a uno 

La word AudioDevice? tenta poi di a- 
prire il device audio con una chiamata alla 
funzione della libreria EXEC OpenDevice 
e ritorna un flag vero se ha successo. Se 
la chiamata ha successo la struttura IOAu- 
dio viene riinizializzata affinché punti ai dati 
per la generazione della forma d'onda 
Altrimenti l'esecuzione termina con il mes- 
saggio ‘Il device audio non è stato 
aperto.” e quindi viene liberata la memo- 
ria allocata per la message port. Se l'a- 
pertura del device audio ha successo e la 
funzione OpenDevice ha memorizzato l’in- 
dirizzo del device node nel campo 
+ioDevice, l'indirizzo della struttura sound 
viene passato alla funzione BeginlO che 
abilita il DMA audio e produce il suono. 
WaitlO attende che il suono finisca, e Clo- 
seDevice abbandona il device audio. 
FreeAudioPort restituisce allo heap del si- 
stema la memoria allocata per la message 
port. 


Disegno realizzato 
con Amiga 2000 

e stampato 

con Xerox 4020. 


La sintassi appropriata per generare un 
suono è 


1200 Hz Sine Wave 
2000 Hz Square Wave 


e così via. Naturalmente, una volta che la 
frequenza sia stata specificata utilizzando 
Hz, non è più necessario ripetere il co- 
mando se intendiamo generare un altro 
tipo di forma d'onda della stessa frequen- 
za. In altre parole, una volta che il coman- 
do 2000 Hz viene eseguito, Triangle Wave 
oppure Sawtooth Wave genereranno le 
forme d'onda appropriate alla frequenza 
2 kHz. E ancora, dopo che siano stati 
specificati la frequenza e i dati della forma 
d'onda, Wave può venire utilizzato nuova- 
mente per rigenerare lo stesso tono. 

Bene, ora che la strada verso il controllo 
del suono in Forth è stata aperta non pos- 
siamo che augurarci che possiate prose- 
guire nel migliore dei modi. Al prossimo 
incontro. 
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Patti chiari, amicizia lunga 


di Mr. Lambda 


Avviarsi sulla luminosa strada della 
programmazione con il linguaggio C è 
possibile a patto che sappiamo adattare 
le nostre conoscenze di programmazione 
al nuovo ambiente oppure ci accostiamo 
fin dall’inizio con idee chiare e precise alle 
possibilità offerte da questo sorprendente 
linguaggio. Ed è proprio questo lo scopo 
di questo nostro incontro. Quindi inforca- 
te i vostri occhiali da sole e seguiteci. 

Negli articoli che via via vi introdurranno 
al linguaggio, il C non sarà lasciato a se 
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stesso, ma volta per volta verrà messo in 
relazione ad altri linguaggi come il BASIC, 
il Pascal, l’Assembly, ecc. E questo perché 
riteniamo che alcuni aspetti del C saranno 
facilmente appresi da coloro che conosca- 
no sufficientemente un altro linguaggio di 
programmazione. Prendiamo, per esem- 
pio, la funzione C chiamata printf() che 
stampa messaggi sullo schermo. ll suo 
nome significa ' print formattato ’. Se la 
parola ’ funzione ' vi e' nuova, ma non lo 
dovrebbe essere, potete sostituirla con le 


parole ' subroutine ' oppure ' procedura 
'. Una funzione e' una parte di una pro- 
gramma che esegue un determinato lavo- 
ro, come stampare messaggi sullo scher- 
mo, oppure leggere file dal disco. 

Ma prima di continuare concediamoci 
alcuni brevi riferimenti storici. La maggior 
parte delle introduzioni al linguaggio C 
comprendono riferimenti storici per parec- 
chie buone ragioni. Innanzitutto calarsi nel- 
la giusta atmosfera e quindi comprender- 
ne i rapporti con l'evoluzione informatica. 
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Brian Kernighan e Dennis Ritchie hanno 


scritto il libro “The C Programming 
Language”, che voi potete leggere nella 
traduzione offerta dalla Jackson, nel 1977. 
Ma il linguaggio C era stato già sviluppato 
agli inizi degli anni settanta sotto il sistema 
operativo Unix. Infatti, come già dovreste 
sapere, a tutt'oggi il sistema operativo Unix 
è scritto proprio in C e il C a sua volta 
adotta alcune convenzioni del sistema U- 
nix, come il modo standard dei programmi 
in C di accettare input e inviare output. 

Ma c'è dell'altro. E ci sono altre ragioni 
per questo. C e Amiga sono strettamente 
imparentati. AmigaDOS, il sistema opera- 
tivo di Amiga, è basato sul sistema ope- 
rativo TRIPOS. Martin Richards della Cam- 
bridge University, uno dei ricercatori che 
ha contribuito maggiormente a TRIPOS, 
ha pure scritto un linguaggio chiamato 
BCPL, che a sua volta ha ampiamente in- 
fluenzato la formulazione del linguaggio C 
e insieme al linguaggio C è stato utilizzato 
per lo sviluppo del sistema operativo di 
Amiga. Ma non basta. Commodore-Amiga 
ha utilizzato il C per scrivere Intuition e 
Workbench, il software a window e menu 
di Amiga. 

Ormai si può dire, senza timore di smen- 
tite, che il C è divenuto il linguaggio pre- 
ferito tra i programmatori per tutte le sue 
straordinarie qualità e i pochi difetti. Il C è 
rapido, soddisfacente per la maggior parte 
delle applicazioni. Il C è veramente versa- 
tile e flessibile. Permette al programmatore 
di fare quasi ogni cosa. Mentre il Pascal 
può rifiutarsi di permettere l'assegnamento 
di una variabile in virgola mobile a una 
variabile carattere, e il BASIC si rifiuta di 
assegnare una variabile stringa a una va- 
riabile intera, il C permette con facilità tali 
assegnamenti. Per quanto siano possibili, 
queste mescolanze di tipi di dati non sono 
consigliabili, ma in ogni caso il C assume 
che voi sappiate che cosa state facendo 
e compie esattamente ciò che gli avete 
chiesto. 

Questa caratteristica del linguaggio vie- 
ne chiamata ' typing '. IL Pascal e' un lin- 
guaggio fortemente tipizzato, dal momen- 
to che l'operatore * := ' non ci consente 
di assegnare un numero in virgola mobile 
a una variabile carattere. Il BASIC e' meno 
fortemente tipizzato , dal momento che 
= ' assegnera' numeri in virgola mobile 
ad interi e viceversa. Tuttavia il C è debol- 
mente tipizzato, anche se offre una varietà 
e complessità di tipi di dati di tutto rispetto. 
Il compilatore può produrre un avvertimen- 
to o warning nel caso che i tipi di dati non 
corrispondano, ma continuerà a fare il suo 
dovere fino in fondo e il programma gi- 
rerà ugualmente. 


Ma se qualcuno a questo punto sta già 
svenendo o giù di lì per la terminologia 
utilizzata, vi proponiamo i seguenti com- 
menti. | numeri in virgola mobile sono nu- 
meri con una componente frazionale. | 
computer devono rappresentare 7,302 co- 
me un numero a virgola mobile, mentre 
3751 può essere memorizzato come un 
numero intero. È importante osservare che 
ciascun tipo una quantità diversa di spa- 
zio di memoria per essere memorizzato. 

| programmatori più smaliziati conside- 
rano il comportamento del C rispetto ai tipi 
di dati come una qualità del linguaggio e 
vi si riferiscono in termini di flessibilità. Co- 
loro invece che si avvicinano al C dopo 
essersi abituati a programmare in Pascal 
o BASIC considerano questa libertà del 
linguaggio come una disgrazia. Il C, infatti, 
ha pochi avvertimenti del tipo abituale in 
Pascal oppure BASIC. Anche il C è un lin- 
guaggio compilato esattamente come il 
Pascal o il Modula-2 e diversamente dal 
BASIC, che è un linguaggio interpretato. 
E se voi conoscete il Pascal oppure il Mo- 
dula-2 apprenderete molto più facilmente 
il C. Quando si parla di linguaggio ' com- 
pilato ' significa che un programma viene 
convertito in un’altra forma prima di essere 
eseguito. Per i linguaggi compilati, un pro- 
grammatore crea un testo sorgente o co- 
dice sorgente con un editor, e quindi com- 
pila il codice sorgente con il compilatore, 
producendo un codice oggetto o modulo 
oggetto. | moduli oggetto devono essere 
poi linkati con un programma linker per 
produrre un programma eseguibile. Il 
compilatore traduce il codice sorgente nel 
linguaggio macchina del computer, e pro- 
duce una lista di variabili e funzioni utiliz- 
zate all'interno di questo programma. Per 
esempio, un programma puo’ utilizzare la 
funzione printf(). Questa funzione può far 
parte del linguaggio, ma deve essere de- 
finita da qualche parte al di fuori dal co- 
dice sorgente, a meno che non la ridefi- 
niate voi per l'occasione. La funzione prin- 
tf() viene detta appunto esterna o non ri- 
solta, dal momento che il compilatore non 
può generare codice macchina per essa. 
Un modulo oggetto è composto da que- 
sta mescolanza di linguaggio macchina e 
liste di riferimenti non risolti (unresolved 
references). 

Dopo che il programma è stato compi- 
lato, tutti questi riferimenti alle funzioni e 
alle variabili devono essere risolti con il 
linker. 

Se voi comprerete un compilatore C, 
insieme con esso avrete a disposizione 
diverse collezioni di funzioni pre-scritte e 
pre-compilate, chiamate librarie. Le fun- 
zioni standard come printf() sono incluse 


in una libreria, mentre sin(), cos() e altre 
funzioni matematiche sono incluse in un'al- 
tra. 

Il modulo oggetto prodotto precedente- 
mente viene linkato con una o più librerie. 
Il linker utilizza la lista delle funzioni e va- 
riabili non risolte del modulo oggetto per 
individuare ciascuna libreria di cui servirsi. 
Se una funzione viene trovata in una libre- 
ria, vengono cercati il suo codice macchi- 
na e la sua lista di riferimenti non risolti, 
fino a trovare e risolvere tutti i riferimenti. 
Quindi solamente il linker può produrre un 
programma eseguibile. Questo file viene 
composto solamente dalle funzioni che ne- 
cessarie al programma. Le altre funzioni 
di libreria vengono lasciate fuori. 

Se il linker non può trovare un riferimen- 
to, non può produrre un programma cor- 
retto, dal momento che manca qualcosa 
che costituisce il programma. Il program- 
ma linker si fermerà dopo aver stampato 
una lista di funzioni e/o variabili esterne 
(unresolved externals) che non riesce a 
trovare nelle librerie a disposizione. In que- 
sto caso, il programmatore dovrebbe esa- 
minare l'output del linker ed effettuare le 
correzioni del caso. Spesso il testo sor- 
gente contiene errori di ortografia. Se prin- 
tf) è stato scritto prnitf(), il linker non riu- 
scirà mai a trovare prnitf(), anche se è in 
grado di individuare printf(). Se, per esem- 
pio, sin() e cos() compaiono nella lista di 
output del linker, il programmatore può 
anche aver dimenticato di includere la li- 
breria di funzioni matematiche. La vostra 
abilità di interpretare correttamente l'ou- 
tput del linker si svilupperà con il tempo. 

Questo processo di compilazione e lin- 
kaggio vi costringe a scrivere molto nel 
CLI. Voi potete però servirvi sia di speciali 
comandi presenti nei compilatori stessi - 
LC nel compilatore Lattice C per esempio 
-, sia di particolari file batch o execute 
chiamati MAKE. Nell'articolo dedicato al C 
del numero precedente della rivista vi ab- 
biamo appunto presentato un'utility MAKE 
che vi permette di utilizzare efficacemente 
il compilatore Lattice C 3.10. Se voi avete 
creato un programma C chiamato Prova.c 
e volete compilarlo, è sufficiente che scri- 
viate sulla linea comandi del CLI. 
EXECUTE MAKE PROVA 

E il gioco è fatto. Come vi abbiamo già 
spiegato il file batch o execute contiene 
tutti i comandi CLI necessari per la com- 
pilazione e il linkaggio di un programma 
C, evitandovi un mucchio di digitazione ad 
alto rischio! 


Primi passi 


Esaminiamo con attenzione un breve e 
semplice programma in C, BASIC, e Pa- 
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scal. Il programma moltiplicherà due nu- 
meri e stamperà il risultato. Eccolo in C: 


# include ‘’stdio.h” 
/* un programma per moltiplicare due numeri */ 
main() 


{ 
int a,b,c; 


a=3; 

b=4; 

C=a*bD; 

printf(”Il risultato è %d\n”,c); 


Eccolo invece in BASIC: 


5 REMun programma per moltiplicare 
6 REM due numeri 

10 a=3 

20 b=4 

30 c=a*b 

40 print "Il risultato è ”;c 


E in Pascal: 


program add(input,output); 
integer a,b,c; 
(* un programma per moltiplicare due numeri *) 
begin 
a:= 8; 
b:= 4; 
c:=a°b; 
writeln('Il risultato:’,c); 
end. 


Per prima cossa potete notare che un 
programma in C ha molta puntaggiatura. 
Il C utilizza la puntaggiatura nello stesso 
modo in cui Pascal utilizza ' begin ' e ’ 
end'. Questo sembra rendere i programmi 
in C piu' difficili da leggere dei programmi 
in Pascal, per esempio. Mentre il Pascal 
utilizza ' begin’ e’ end’ per delimitare 
l'inizio e la fine delle procedure e delle 
funzioni, il C utilizza le parentesi graffe ' { 
"e']". Inoltre, il Pascal e il C separano i 
commenti all programma dal codice an- 
cora con l'utilizzo della punteggiatura. Il C 
utilizza la coppia di '/*’ e’ */’, mentre il 
Pascal utilizza ' (* * e" *) ". Il BASIC uti- 
lizza invece lo statement REM all'inizio del- 
la linea per segnalare all'interprete un 
commento. Coloro che utilizzano Amiga- 
BASIC sanno pero’ che i commenti pos- 
sono venire segnalati al compilatore anche 
attraverso l'utilizzo dell'apostrofo (' ) e che 
non sono necessari i numeri di linea. Quasi 
tutto cio' che viene detto a proposito del 
Pascal può essere applicato al Modula-2. 

Sia il Pascal che il C sono linguaggi 
compilati. Osservate come il Pascal e il C 
dichiarino esplicitamente negli esempi le 
variabili a, b e c. Il Pascal scrive ' integer 
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' dove il C scrive ' int ' per dichiarare una 
variabile integera. 

Questo e' comune ai linguaggi compi- 
lati. Un compilatore infatti ha bisogno di 
conoscere il tipo (type) della variabile pri- 
ma di utilizzarla nel programma. Questa 
conoscenza verrà utilizzata per eseguire 
correttamente le operazioni, come addi- 
zioni o moltiplicazioni, quando questa va- 
riabile viene utilizzata successivamente, 
poiché numeri interi e numeri a virgola 
mobile vengono utilizzati differentemente 
e occupano un diverso spazio di memo- 
ria. 

L'esempio in BASIC no necessita di di- 
chirazioni di tipo esplicite per ciascuna va- 
riabile. Il BASIC è un linguaggio interpre- 
tato. (Naturalmente esistono anche ottimi 
compilatori per il BASIC come quello of- 
ferto dalla Microsoft per AmigaBASIC.) 
Quando voi digitate RUN, il computer a- 
nalizza il testo di ciascuna linea per ese- 
guire successivamente i diversi passi del 
programma. Se il BASIC incontra una va- 
riabile che non riconosce, asssume che 
quela variabile sia un numero in virgola 
mobile. Quindi nel nostro esempio a,b e c 
sono variabili in virgola mobile. 

IL C ha pure anche altri tipi di variabili 
oltre a ’ int ':’ float * per virgola mobile, e 
' char’ per variabili carattere e altre che 
vedremo a suo tempo. Ciascun tipo pos- 
siede un intervallo valido di valori. Per e- 
sempio. ’ int ' e' limitato a più o meno due 
bilioni in Amiga, mentre ' char ' e' limitato 
ai valori tra +127 e -128. In realtà per 
questi intervalli bisogna sempre tenere an- 
che conto delle implementazioni reali dei 
vari compilatori. 

| tipi ' integer ', cioe’ interi come ' char 
'e' int’, possono venire modificati dalla 
parola ' unsigned ' - senza segno -, crean- 
do in tal modo i tipi’ unsigned char ' e * 
unsigned int ’. Questi tipi hanno rispettiva- 
mente intervalli tra O e 255 e tra 0 e oltre 
i 4,2 bilioni. Se voi conoscete bit e byte, 
potrete dedurne che questi valori possono 
essere rappresentati in 8 e 32 bit. Ciascun 
tipo ha diversi operatori validi, come ad- 
dizione e sottrazione, moltiplicazione e di- 
visione. Diversamente dal BASIC e dal Pa- 
scal, il C e' molto flessibile relativamente 
alla possibilità di operare con essi. Per 
esempio, potete addizionare variabili ' 
char ' e variabili * int '. Il valore di un ' 
char ' e’ il valore ASCII del carattere me- 
morizzato all'interno di esso. In BASIC po- 
treste ottenere questo valore utilizzando la 
funzione ASC(), in Pascal potreste invece 
utilizzare ORD(). 

Avrete senz'altro osservato che le linee 
del programma in C e in Pascal terminano 
con un punto e virgola. Questa è un'altra 


caratteristica dei linguaggi compilati. Il ' ; 
comunica al compilatore che il program- 
matore ritiene che la linea sia completa. 
Infatti, le linee dei programmi in C possono 
essere distribuite su diverse linee fisiche 
senza alcuna conseguenza dannosa. 


printf 
( 
"Il risultato e' %d” 


-. — 0 - 


Il compilatore analizza la linea nello stes- 
so modo. E questo non è possibile con la 
maggior parte degli interpreti BASIC. 

Incominciamo a prendere in considera- 
zione il codice C. 


# include “stdio.h” 


È un comando per una parte speciale 
del compilatore chiamata preprocessore. 
Questa linea compilatore: a questo punto 
compila anche il file programma chiamato 
stdio.h”. Questo file contiene le dichiara- 
zioni delle variabili e delle funzioni utilizzate 
da printf() e altre funzioni standard di I/O. 
Il preprocessore ha anche altre caratteri- 
stiche che considereremo in seguito. 

Osserviamo ora attentamente la linea 
che contiene la funzione printf(). Printf() ha 
due argomenti, una stringa di caratteri con- 
tenente il testo “Il risultato è %d\n” è il 
nome di una variabile intera, c. Per un 
programmatore in C questi sono gli argo- 
menti passati alla funzione, gli argomenti 
della funzione oppure ancora i valori pas- 
sati alla funzione. Come avrete ormai ca- 
pito gli argomenti vengono collocati tra le 
parentesi e separati dalle virgole. 

Il primo argomento passato alla funzio- 
ne printf() descrive il formato del testo che 
noi vogliamo visualizzare sullo schermo. 
Esso contiene due parti che potrebbero 
esserci poco familiari, entrambe presenti 
verso la fine del testo tra virgolette. (Ah, 
se voi conosceste il FORTRAN, potreste 
ora contare sulla conoscenza del coman- 
do FORMAT!) Il %d significa “qui stampa 
un valore intero”. Il \n significa ‘qui stam- 
pa una carattere di accapo”, che dovreb- 
be muovere il cursore sulla linea succes- 
siva, esattamente come succede quando 
voi premente il tasto del Return. Se noi 
desideriamo visualizzare due valori utiliz- 
zando printf(), possiamo scrivere: 


printf( “Noi abbiamo %d mele e %d 
pere.\n”,mele, pere); 


Per ottenere questo risultato: 
Noi abbiamo 7 mele e 5 pere. 
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Se naturalmente le variabili ' mele ' e ’ 
pere ' contengono rispettivamente i valori 
7e5. 

Noi potremmo chiedere a printf() di 
stampare un valore in un campo di deter- 
minata ampiezza. Se si utilizza %4d come 
formato per gli interi, il numero sara' vi- 
sualizzato con gli spazi necessari per riem- 
pire quattro posizioni carattere. La funzio- 
ne printf() ha altri comandi di formattazione 
- per una visione complessiva e dettagliata 
consultare sempre il manuale del proprio 
compilatore -, come %x, per esempio, che 
stampa valori in esadecimale oppure %c, 
utilizzato con le stringhe formattate per vi- 
sualizzare un valore come carattere ASCII, 
similmente al comando BASIC CHRS0. 

Le funzioni vengono utilizzate estensi- 
vamente in C; e alle funzioni pre-scritte che 
il linguaggio vi mette a disposizione ben 
presto si affiancheranno le funzioni che voi 
stessi scriverete per i vostri programmi. Se 
voi avete utilizzato il Pascal avrete acqui- 
stato una certa familiarità con le procedure 
e le funzioni. Ebbene le funzioni C ricor- 
dano proprio queste ultime dal momento 
che ritornano tutte un valore. (In realtà e- 
siste la parola riservata VOID che preclude 
alle funzioni la possibilità di ritornare va- 
lori, ma di ciò in seguito, quando ne sa- 
prete molto di più.) Le funzioni C, comun- 
que, non possono venire nidificate come 
succede nel Pascal con le procedure e le 
funzioni. 

Se voi non avete mai utilizzato il Pascal, 
pensate alle funzioni BASIC SIN() e COS(). 
Queste funzioni ritornano un valore in vir- 
gola mobile basato sul loro argomento, e 
cioè il numero tra parentesi. Tutte le fun- 
zioni C ritornano un valore di un determi- 
nato tipo. Eccovi un frammento di pro- 
gramma che dichiara una funzione che ri- 
torna un intero, il prodotto di due argo- 
menti interi: 

/* una funzione per moltiplicare due numeri */ 


int mult(a,b) 
int a,b; 
| 


int c; /* una variabile locale */ 


c=a'*b; 
return(c); 


} 


La prima linea dichiara una nuova fun- 
zione chiamata mult(), che ha due argo- 
menti, a e b, entrambi interi. Una dichia- 
razione di funzione può essere suddivisa 
in diverse parti. Prima, il tipo della funzione. 
Qui, noi abbiamo utilizzato ' int '. Se nes- 
sun tipo viene dichiarato, il C assume che 
la nuova funzione sia di tipo ' int '. Secon- 
da, il nome della funzione, ' mult '. Tutte 
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le dichiarazioni delle funzioni hanno un’in- 
sieme di parentesi, sia che la funzione ab- 
bia argomenti oppure no. Questa funzione 
ha due argomenti. Il tipo di ciascun argo- 
mento presente tra le parentesi deve ve- 
nir dichiarato prima della parentesi graffa 
aperta. La parentesi graffa aperta indica 
al compilatore l’inizio del codice della fun- 
zione. 

La linea dopo la parentesi graffa aperta 
dichiara una variabile locale chiamata c. 
Se voi conoscete il Pascal, le variabili lo- 
cali in C lavorano nello stesso modo che 
in Pascal, tenendo a mente pero' la restri- 
zione che le funzioni non possono essere 
nidificate in C. Se voi, invece, non cono- 
scete il Pascal, una variabile locale è una 
variabile a cui non si può accedere da 
un'altra procedura o funzione in un pro- 
gramma, anche se un'altra funzione di- 
chiara una variabile locale con lo stesso 
nome. ll valore di una variabile locale è 
conosciuto solamente durante l'esecuzio- 
ne di una variabile. Al termine dell'esecu- 
zione della funzione, la variabile locale 
scompare, e la memoria che essa ha uti- 
lizzato vien riutilizzata. 

ll'c=a*b' dovrebbe essere chiaro, 
qualsiasi linguaggio conosciate. La linea ' 
return(c); ' rappresenta la fine della fun- 
zione mult(). Il valore ' c ’ viene ritornato 
alla funzione che ha chiesto di utilizzare la 
funzione mult(). Vediamo ora un program- 
ma completo in C che utilizza la funzione 
mult() descritta sopra. 


# include ‘stdio.h” 
/* una funzione per moltiplicare due numeri */ 


int mult(a,b) 
int a,b; 
{ 


int c; /* una variabile locale */ 
C=a°*b; 
return(c); 


|* Tutte le variabili dichiarate all’esterno delle 
dichiarazioni della funzione sono variabili 
globali, che possono essere utilizzate da 
tutte le funzioni 

* 

int t; /* una variabile globale */ 


main() 

{ 

int r,s; /* variabili locali */ 
ra 9; 

S$S=4; 

t = mult(r,s); 

printf(Il risultato e’ %d\n”,t); 
} 


In questo programma, la funzione 
main() chiama mult() con i valori memoriz- 
zati iin'r'e's'. Ipotizzando che’ r' 
contenga 3 e ' s ’ contenga 4, la funzione 
mult() ritornera' il valore 12. All'interno del- 
la funzione main() il valore 12 verrà me- 
morizzato nella variabile globale di main() 
chiamata ’ t”. 

Un programmatore spiegherebbe cio' 
che è accaduto dicendo che la funzione 
mult() è stata ' chiamata ' dalla funzione 
main() e il valore 12 e' stato ’ ritornato ' a 
main(). Poinché il C e' basato su funzioni 
e chiamate di funzioni, i programmatori 
spesso utilizzano queste espressioni. Le 
espressioni ' chiamata ' e ' valore di ritorno 
' alludono alla struttura fondamentale del 
C. Entrambe le espressioni vengono uti- 
lizzate nello stesso contesto per program- 
mi in linguaggio macchina. E ora a main(). 

La dichiarazione della funzione main() 
non ha argomenti, e nessun tipo specifico 
vene dichiarato, in questo modo main() ri- 
tornera' un * int’. Main() e' una funzione 
speciale. Quando il programma C viene 
avviato dal sistema operativo, main() è la 
prima funzione che viene eseguita. A parte 
questo, main() non è in alcun altro modo 
differente dalle altre funzioni C. 

Ma ritorniamo alle veriabili. L'opposto di 
locale è globale. Le variabili globali sono 
tutte quelle variabili che vengono dichia- 
rate all'esterno di tutte le funzioni del pro- 
gramma. D'altra parte le funzioni globali 
vengono dichiarate nello stesso modo del- 
le variabili locali. La sintassi è la stessa: 
prima il tipo - int, per esempio -, quindi i 
nomi delle variabili, separati da virgole, se 
ce ne sono più di una, e per finire la ter- 
minazione ' ; '. Le variabili globali possono 
venire lette e modificate da qualsiasi fun- 
zione del programma. La maggior parte 
dei programmi presentano una mescolan- 
za di variabili locali e variabili locali. Le 
variabili vengono utilizzate per calcoli in- 
termedi, dal momento che scompaiono 
quando la funzione termina. Le variabili 
globali vengono utilizzate per i dati piu' 
permanenti, e per quei dati che diverse 
funzioni possono avar necessità di utiliz- 
zare. Se una funzione dichiara una varia- 
bile locale con lo stesso nome di una va- 
riabile globale, la variabile locale ha la pre- 
cedenza. 

Nel nostro prossimo incontro approfon- 
diremo l'utilizzo del preprocessore, e co- 
me dichiarare altri tipi di variabili. Ci intro- 
durremo nell'argomento fondamentale 
dell'IYO considerandone le funzioni a di- 
sposizione. E forse ci diletteremo con le 
funzioni speciali di Amiga per le creazione 
di window. 
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Come si programma 
in Assembly 





Il primo passo per realizzare un pro- 
gramma è, naturalmente, sedersi e pen- 
sare con calma a cosa si deve fare; è 
consigliabile poi scarabocchiare una pri- 
ma versione del programma su carta. Si 
può quindi passare alla fase di editing: con 
l'ausilio di un qualunque editor, come il 
comando ED del CLI, si digita il program- 
ma e si salva il testo (anche un word pro- 
cessor va bene, purché capace di salvare 
in ASCII). Se si decide di usare ED biso- 
gna entrare in CLI, richiamare l'editor di- 
gitando ED nomesorgente (dove nome- 
sorgente è il nome che si decide di asse- 
gnare al testo, noto in gergo programma. 
torio come codice sorgente) e, dopo aver 
inserito tutto il testo, salvarlo con ESC X 
Bisogna quindi convertire il testo così ot 
tenuto in un programma in linguaggio 
macchina; questa operazione, che nel. 
l'ambito dei linguaggi evoluti è svolta da 
un interprete o da un compilatore, richiede 
invece nel nostro caso un assemblatore 
(più diffusamente noto come assembler) 
Ne esistono di molti tipi e in questa serie 
di articoli verrà impiegato il macroassem- 
bler standard prodotto dalla Metacomco; 
gli altri assembler possono differirne nel- 
l'uso delle macro, delle label locali (nn$) e 
delle direttive di assembly come CNOP 0,2 
che serve ad allineare il programma a in- 
dirizzo pari: se quindi avete un assembler 
diverso leggete il relativo manuale. Se in 
vece avete lo stesso assembler potete ri- 
chiamarlo, sempre da CLI, con ASSEM 
nomesorgente -O nomeoggetto, dove 
quest'ultimo parametro è il nome con cu 
desiderate battezzare il programma as- 
semblato, generalmente noto come codi 
ce oggetto. Occorre infine linkare il tutto 
con il comando ALINK nomeoggetto TO 
nomedefinitivo; ALINK si trova, assieme ad 
ASSEM, nella directory c del disco dell'as- 
sembler e se il CLI ha qualche difficoltà 
nel trovarlo dovrete specificare il pathna- 
me completo (ASSEM-DEVEL:c/ASSEM e 
ASSEM-DEVEL:c/ALINK) quando li attiva- 
te. Dopo tutta questa procedura avrete 
ottenuto un file chiamato nomedefinitivo 
che può essere mandato in esecuzione da 
CLI semplicemente digitandone il nome. 
Altri tipi di assembler possono avere l’e- 
ditor e il linker incorporati (caratteristica 
che fece la fortuna del TurboPascal), allo 
scopo di semplificare la vita del program- 
matore. | possessori del sopracitato as- 
sembler della Metacomco sono vivamente 
consigliati di usare estesamente il RAM 
Disk e le sequenze di comandi in base alla 
propria esperienza individuale, per non e- 
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Stenuare in misura eccessiva il drive e la 
propria pazienza 

Se il vostro programma non funziona 
esiste un'ampia gamma di tool per il de- 
bugging come monitor e disassembler (in 
genere presenti nello stesso package); il 
primo vi consente di controllare da vicino 
lo stato dei registri del processore e delle 
locazioni di memoria durante l'elaborazio- 
ne, permettendo di inserire dei breakpoint 
(istruzioni di stop temporaneo) nel pro- 
gramma o di eseguire un'istruzione alla 





volta (tracing); il secondo riconverte qua- 
lunque codice oggetto in qualcosa di ab- 
bastanza simile al codice sorgente origi- 
nario, anche se si perdono tutte le label. 





Struttura di una linea 


L'Assembly non prevede l’uso del mul- 
tistatement, cioè della possibilità di inserire 
più comandi in una stessa riga. Ogni linea 
di programma possiede una struttura ben 
precisa e può essere pensata come sud- 
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Seconda puntata del corso di programmazione 
sul linguaggio Assembly MC68000, 
il linguaggio macchina dell’Amiga 





divisa in campi, la lunghezza di ognuno 
dei quali può però variare da linea a linea 
| campi sono quattro: label, istruzione, o- 
perandi e commento. Una label (etichetta) 
è una corta stringa alfanumerica usata per 
marcare un punto del programma, come 
riferimento per i salti e per la manipolazio- 
ne delle variabili; è importante notare che 
le label esistono solo per l'assemblatore, 
non per il microprocessore. Se a esempio 
si contrassegna un punto del programma 
con una label e poi in un altro punto si 
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di Paolo Russo 


inserisce un'istruzione di salto a quella eti- 
chetta l'assembler sostituirà alla label, nel- 
l'istruzione di salto, un numero che rap- 
presenta l'indirizzo di memoria a cui sal- 
tare. Il microprocessore ragiona sempre in 
termini di indirizzi numerici: le label sono 
comode per gli esseri umani e per questo 
motivo l'assembler le adotta, converten- 
dole poi in numeri e indirizzi al momento 
di generare il codice oggetto. ll campo 
della label può essere vuoto. 

Il campo successivo, quello dell'istru- 
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zione, non può mai essere nullo e deve 
contenere il nome dell'istruzione stessa, 
mentre gli operandi, se presenti, devono 
essere inseriti nel campo successivo, se- 
parati l'uno dall'altro da una virgola (non 
possono esservene più di due). ll com- 
mento finale è opzionale. Si può, se lo si 
desidera, riservare un'intera linea a scopo 
di commento, inserendo nella prima co- 
lonna un carattere particolare che in ge- 
nere è un asterisco ma che può in effetti 
variare da assembler ad assembler. | vari 
campi devono essere separati da almeno 
uno spazio; questo significa che anche se 
in una linea non c'è alcuna label occorre 
comunque lasciare almeno uno spazio pri- 
ma di digitare il nome dell'istruzione, in 
modo da non confondere l’assembler. 





Byte, word e long word 


| registri del 68000, come illustrato nella 
scorsa puntata, sono a 32 bit, ossia sono 
delle long word. Nonostante ciò, non sem- 
pre il processore esegue calcoli con 32 bit: 
per motivi di ordine pratico ci si limita spes- 
so a 16 oppure 8 bit. La lunghezza dei 
dati su cui si opera non è intrinseca al dato 
Stesso ma deve essere specificata in ogni 
istruzione. Per esempio esistono tre forme 
dell'istruzione ADD: ADD.B, ADD.W e AD- 
D.L che sommano rispettivamente numer 
a 8, 16 e 32 bit. Naturalmente B, W ed L 
significano rispettivamente byte, word e 
long word. L'istruzione ADD.B D1,D2 
somma gli otto bit meno significativi di D1 
e D2, ponendo il risultato negli otto bit 
meno significativi di D2. | rimanenti 24 bit 
di D2 non vengono alterati; eventuali riporti 
da e verso il nono bit vengono troncati 
senza pietà. 

Quando non è presente alcun suffisso 
l'assembler parte solitamente dal presup- 
posto che esista un .W sottinteso; in altre 
parole ADD D1,D2 significa ADD.W 
D1,D2. 

Quando si lavora con i registri occorre 
tenere presente che ogni operazione su 
byte e word agisce sempre sulla parte 
meno significativa del registro coinvolto. | 
registri indirizzi si comportano in maniera 
alquanto originale: per motivi tecnici è vie- 
tato operare su di loro con una lunghezza 
di soli otto bit; se si tenta di scrivervi, som- 
marvi o sottrarvi un numero a soli 16 bit 
questo viene automaticamente esteso a 32 
bit e l'operazione coinvolge poi l'intero re- 
gistro. Esempio: ADD.B #10,A0è illegale, 
ADD.W #10,A0 e ADD.L #10,A0 agisco- 
no entrambe su 32 bit. L'unica eccezione 
a questa regola è costituita dalle istruzioni 
ADDQ.W #n,An e SUBO.W #n,An che 
agiscono sulla sola word inferiore di An. 
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Questa è un'importante eccezione che è 
opportuno ricordare, in quanto capita so- 
vente di incrementare o decrementare un 
registro indirizzi con ADDQ e SUBOQ, con 
l'intenzione di agire su long word, e di di- 
menticare il .L' nella illusoria consapevo- 
lezza che tutte le operazioni sui registri in- 
dirizzi avvengano a 32 bit. Il bug che ne 
deriva colpisce sporadicamente (solo 
quando si verifica un riporto da o verso la 
word superiore, che resta invece inaltera- 
ta) ed è quindi assai arduo da snidare se 
non se ne sospetta l'esistenza. Questo bug 
è così sfuggente che non è troppo raro 
trovarlo addirittura in qualche sistema o- 
perativo, come ha potuto accertare l'au- 
tore dell'articolo mentre, armato di disas- 
sembler, passava al setaccio la ROM del 
suo QL. 


I modi di indirizzamento 


Abbiamo visto in precedenza come l'i- 
struzione ADD D1,D2 sommasse il conte- 
nuto di D1 al registro D2; in questo caso 
l'istruzione fondamentale è ADD mentre 
DI e D2 sono i suoi operandi. Che cosa 
avremmo potuto utilizzare in luogo di D1 
e D2? In altri termini, quali sono i possibili 
operandi su cui può agire l'istruzione 
ADD? 

Nell'ambito di un linguaggio evoluto 
questa domanda non avrebbe senso: 0- 
vunque un'istruzione richieda un parame- 
tro di un certo tipo è possibile utilizzare una 
qualunque espressione che, una volta cal- 
colata, fornisca un valore del medesimo 
tipo. Per esempio in AmigaBASIC il co- 
mando PSET (x,y) traccia un punto alle 
coordinate x e y, dove questi due para- 
metri possono essere costituiti da espres- 
sioni a valore numerico di arbitraria lun- 
ghezza e complessità. Nel linguaggio As- 
sembly invece non si può mai sostituire un 
parametro con un'espressione, a meno 
che il parametro non sia una costante (cioè 
un numero), che può essere sostituita da 
una espressione formata da costanti, la 
quale verrà calcolata in fase di assemblag- 
gio e non in fase di run-time. A esempio 
ADD #13,D5 può essere scritto come 
ADD #8+5,D5 mentre ADD D1+D0,D2 
non ha senso in Assembly. Del resto, se 
fosse sufficiente usare il segno '+' per 
eseguire un'addizione non ci sarebbe al- 
cun bisogno dell'istruzione ADD. 

In Assembly esiste una ristretta gamma 
di forme che un'espressione puo' assu- 
mere perché sia lecito usarla come ope- 
rando, e quel che è peggio è che non tutte 
queste forme sono ammesse in ogni istru- 
zione. In un linguaggio evoluto non è pos- 
sibile stimare esattamente quanta memo- 
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ria occupa una linea di programma, ma 
in Assembly sì: l'occupazione di memoria 
di una singola istruzione è sempre pari a 
due byte più il numero di byte aggiuntivi 
richiesti da ognuno degli operandi. La ta- 
bella 1 mostra le espressioni consentite, 
chiamate modi di indirizzamento, assieme 
al loro consumo di memoria; passiamole 
brevemente in rassegna: 

#n: l'operando è il numero n. Se l'i- 
struzione è veloce (quick), ossia se il suo 
nome termina per Q (MOVEQ, ADDQ, SU- 
BO) l'uso di #n come primo operando non 
richiede byte aggiuntivi. 

Dn: l'operando è il registro dati Dn, o 
meglio lo è il dato contenuto in Dn. 

An: come sopra, con la differenza che 
il registro coinvolto è un registro indirizzi. 
La distinzione è sensata in quanto molte 
istruzioni operano con una sola delle due 
classi di registri. 

(An): questo modo di indirizzamento e i 
seguenti sono indiretti. L'operando è la 
locazione di memoria puntata da An, os- 
sia il cui indirizzo è contenuto in An. 

(An)+: come sopra, ma con l'aggiunta 
del postincremento: dopo che il dato pun- 
tato da An è stato utilizzato, An viene in- 
crementato di un numero pari alla lunghez- 
za del dato in questione. 

-(An): come sopra, ma con il predecre- 
mento: prima che il dato venga utilizzato, 
An viene decrementato della lunghezza 
del dato. 

di6(An): l'operando è la locazione di 
memoria il cui indirizzo si ottiene somman- 
do il numero d16 ad An. La costante d16, 
detta displacement o spiazzamento, è a 16 
bit. Sarebbe forse stato più logico indicare 
questo modo come (An+d16), ma que- 
sto formato non è standard e non viene 
riconosciuto dagli assemblatori. 

d8(An,i): come sopra, ma per ottenere 
l'indirizzo occorre sommare anche i, detto 
registro indice, che può essere un qua- 
lunque registro, sia dati che indirizzi. Lo 
spiazzamento ammesso è a soli otto bit, 
mentre l'indice i può essere inteso sia co- 
me word che come long word a seconda 
del suffisso che gli viene posposto. 

d16(PC): l'operando è la locazione di 
memoria il cui indirizzo si ottiene somman- 
do d16 al program counter. Questo modo 
di indirizzamento è spesso impiegato per 
manipolare dati e variabili incorporati nel 
programma stesso e il cui indirizzo è quindi 
vincolato alla posizione che il programma 
occupa nella RAM. In tal modo il program- 
ma che si ottiene è position independent, 
cioè indipendente dalla posizione; ciò si- 
gnifica che il programma è in grado di 
trovare i suoi dati in qualunque zona di 
memoria venga caricato. Questo argo- 


mento sarà ripreso in futuro. Purtroppo i 
modi di indirizzamento relativi al program 
counter funzionano solo per leggere dati 
dalla memoria e non per scriverveli, a cau- 
sa di una assai discutibile scelta dei pro- 
gettisti. 

d8(PC,i): come sopra, con l'aggiunta di 
un registro indice. Non molto usato a cau- 
sa della limitazione imposta sul displace- 
ment, serve a manipolare tabelle di dati 
incluse nel programma. 

a16: l'operando è la locazione il cui in- 
dirizzo è il numero a16, che risulta quindi 
essere un indirizzo a 16 bit. Questo modo 
di indirizzamento può essere usato solo nei 
32K inferiori di RAM. 

a32: come sopra, ma l'indirizzo è a 32 
bit e consente di raggiungere qualunque 
locazione di memoria. Quando si specifica 
un indirizzo è l'assembler a decidere se 
considerarlo un a16 o un a32. 

range: utilizzato unicamente dall'istru- 
zione MOVEM, è un insieme di registri. Per 
esempio, D0-D3/D5/A1/A3-A5 è un range 
che comprende i registri DO, D1, D2, D3, 
DS, A1, A3, A4 e AS. 

label: utilizzata nei salti, per specificare 
il punto a cui si salta. Tramite le label si 
può anche manipolare un dato incorporato 
nel programma: in questo caso l'assem- 
bler convertirà automaticamente la label in 
un a16, un a32, un di6(PC) o in un 
d8(PC,i), a seconda dei casi, come si ve- 
drà meglio in seguito. 

Tutti gli indirizzi, gli indici e gli spiazza- 
menti sono intesi come numeri dotati di 
segno. 


Alcune istruzioni 


L'istruzione più usata in ogni program- 
ma è MOVE, che, come si può arguire dal 
nome stesso, sposta dati da un punto a 
un altro e può essere considerata un'istru- 
zione di assegnazione, simile all’arcaico 
LET di alcuni dialetti BASIC. Il comando 
MOVE richiede due operandi che devono 
essere separati, com'è d'uso in Assembly, 
da una virgola; il primo di essi, detto sor- 
gente, fornisce il valore da assegnare al 
secondo, detto destinazione. Per esempio 
MOVE.W D1,D2 copia la word meno si- 
gnificativa di D1 in quella di D2, senza al- 
terarne la metà superiore; MOVE.L D0,A3 
assegna il contenuto di DO ad A3; MOVE.B 
# 10,D6 assegna il valore dieci al byte in- 
feriore di D6 mentre MOVE.B 10,D6 legge 
il byte di memoria all'indirizzo dieci e lo 
pone in DE (attenti al '#' !). MOVE e' l’i- 
struzione che consente la massima libertà 
nella scelta dei modi di indirizzamento per 
gli operandi; quasi ogni combinazione di 
modi è lecita. La maggior parte delle altre 
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istruzioni consente tale libertà per uno solo 
dei due operandi, quello sorgente o quello 
destinazione, a scelta del programmatore, 
mentre l'altro parametro può variare in un 
ambito molto limitato (solitamente #n e 
Dn, ma non sempre). A esempio ADD.W 
D1,D1, ADD.W 16(A3),D1 e ADD.W 
D1,16(A3) sono lecite mentre ADD.W 
16(A3),16(A3) non lo è; MOVEW 
16(A3),16(A3) è invece perfettamente le- 
cita, per quanto improduttiva in questo ca- 
so particolare data la coincidenza dei due 
operandi. Tutto questo può sembrare un 
po' complicato ed eccessivamente mne- 
monico, ma l’esperienza insegna che il 
programmatore medio apprende in breve 
tempo con l'esercizio le combinazioni i 
struzione-operandi proibite e le rare volte 
che commette un errore l'assembler stes- 
so lo segnala prontamente. 

Esiste poi una piccola gamma di istru- 
zioni di uso comunissimo che non consen- 
tono quasi nessuna libertà nella scelta dei 
parametri: a esempio MOVEQ #n,Dn, che 
richiede assolutamente un dato immediato 
(a otto bit, che viene esteso a 32, cosa 
questa atipica per un MOVE) come sor- 
gente e un registro dati come destinazione. 
Una curiosità: la Q sta per quick, ossia 
veloce, in quanto la suddetta istruzione 
consuma poca memoria ed è caratteriz- 
zata da un basso tempo di esecuzione; in 
altre parole essa è di uso molto pratico. le 
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#n 

DN 

An 

(An) 
(An) + 
—(An) 
di6(An) 
d8(An,i) 
d16(PC) 
d8(PC,i) 
a16 

a32 
range 
label 





istruzioni che limitano fortemente la scelta 
degli operandi sono tra le più usate; ac- 
cade quindi qualcosa di simile al modo in 
cui alcuni linguaggi umani, come l'italiano 
e l'inglese, gestiscono i verbi: tra di essi, 
quelli irregolari sono quasi sempre i più 
usati. 

Un operando capace di assumere qua- 
lunque forma viene chiamato indirizzo ef- 
fettivo (effective address) e abbreviato in 
ea; per esempio la forma generale dell’i- 
struzione di trasferimento è MOVE ea,ea, 
per sottolineare il fatto che non esiste quasi 
nessuna limitazione nella scelta dei modi 
di indirizzamento; l’istruzione di addizione 
può invece assumere una delle seguenti 
forme: ADD ea,Dn - ADD ea,An - ADD 
#n,ea - ADD Dn,ea. Anche l'addizione, 
come l'assegnazione, possiede una forma 
irregolare’ veloce, che può assumere solo 
la forma ADDQ #n,ea dove n deve es- 
sere compreso tra uno e otto (viene però 
esteso a 8, 16 o 32 bit in base al suffisso 
.B, .W o .L). Questa simpatica istruzione è 
l'equivalente 68000 della meno flessibile 
INC di altri microprocessori. 


Un piccolo esempio 


Fino a questo momento non sono an- 
cora state presentate sufficienti nozioni da 
consentire la realizzazione di un vero e 
proprio programma. Si può però prendere 


NOME 


em 


immediato 

diretto a registro dati 
diretto a registro indirizzi 
indiretto a registro 


indiretto a registro con offset 
indiretto a registro indicizzato 
relativo al program counter 


NAMMNNONNOOCCOCORL 


in considerazione qualche microscopico 
esempio. Il problema è il seguente: esisto- 
no tre interi a 16 bit in memoria agli indi- 
rizzi consecutivi 100000, 100002 e 
100004, che per brevità indicheremo co- 
me A, B e C; bisogna porre nel terzo la 
somma dei primi due. Esistono svariati mo- 
di per farlo e ne prenderemo in conside- 
razione alcuni. 


PROGRAMMA 1 PROGRAMMA 2 PROGRAMMA 3 


MOVE A,DO MOVE A,DO MOVE.L #A,AO 
MOVE B,D1 ADD B,DO MOVE (A0)+,DO 
ADD D1,DO MOVE DO,C ADD (A0)+,D0 
MOVE DO0,C MOVE DO,(A0) 


Il primo metodo è il meno efficiente 
(forse il compilatore di un linguaggio evo- 
luto lo sceglierebbe), il secondo è il più lo- 
gico e intuitivo mentre il terzo, sfruttando 
il fatto che i dati in memoria sono conse- 
cutivi, è il più compatto e veloce. Non as- 
semblate realmente questi programmi, se 
lo faceste otterreste una Guru Meditation 
dovuta all'assenza di un'istruzione di ritor- 
no e alla arbitraria e distruttiva alterazione 
della word 100004. Se anche per assurdo 
tutto funzionasse non vedreste comunque 
nulla sullo schermo. Prossimamente, 
quando sarà stato illustrato l'uso dei flag 
e delle istruzioni di controllo, sarà possi- 
bile realizzare qualche programma vero, 
anche se breve. 


indiretto a registro con postincremento 
indiretto a registro con predecremento 


relativo al program counter, indicizzato 
assoluto corto 
assoluto lungo 
lista di registri 
label 


Se una label segue l'istruzione Bcc, DBcc e BSR allora viene convertita in un offset a 16 bit (n.byte= 2) 
se invece segue l'istruzione Bcc.S o BSR.S allora viene convertita in un offset a 8 bit (n.byte= 0) altrimenti: 


label 
label (PC) 
Tabella 1: modi 
di indirizzamento 
del 68000. 
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viene convertito in a16 o a32 
viene convertito in d16(PC) 
label (PC,i) viene convertito in d8(PC,i) 


(n.byte=2,4) 
(n.byte=2) 
(n.byte=2) 
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La strutturazione è una componente 
molto importante di ogni linguaggio e la 
trattazione di tale argomento, già iniziata 
in precedenza, viene adesso conclusa 
con la presentazione di ulteriori informa- 
zioni di carattere eminentemente pratico, 
più che teorico, riguardanti sia le strutture 
di controllo che i subprogram. Viene poi 
discusso il problema della gestione della 
memoria dell’Amiga dal punto di vista del 
programmatore AmigaBasic; infatti, al 
contrario della maggior parte delle mac- 
chine a otto bit e di molte di quelle a se- 
dici bit, che non soffrono del problema 
della condivisione delle risorse tra più pro- 
grammi, l’Amiga possiede un sistema o- 
perativo multitasking che consente sì a 
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più di un programma di girare contempo- 
raneamente sulla macchina ma obbliga i 
programmi stessi ad attenersi a una se- 
rie di regole per evitare che due di loro 
tentino di usufruire della stessa zona di 
memoria. Protocolli simili esistono anche 
per quanto riguarda la condivisione della 
tastiera, del drive e di parecchie altre ri- 
sorse, ma l’interprete AmigaBasic o il si- 
stema operativo solitamente si occupano 
autonomamente di questi dettagli senza 
scomodare il programmatore. La gestio- 
ne della RAM è invece lasciata agli esseri 
umani, essendo spesso la quantità di me- 
moria disponibile un fattore critico per il 
funzionamento di un programma, dal mo- 
mento che, al contrario di altre risorse co- 
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me la tastiera e il drive, presenta spesso 
la seccante tendenza a esaurirsi. 





Le strutture di controllo 


L'AmigaBasic ha in comune con il Ba- 
sic standard il classico e universalmente 
conosciuto ciclo FOR-NEXT, sul quale non 
e' opportuno soffermarsi a causa della sua 
eccessiva fama. ll ciclo WHILE-WEND, 
molto di moda recentemente e spesso im- 
piegato anche a sproposito, è una gene- 
ralizzazione del ciclo FOR-NEXT dal quale 
differisce nella condizione di uscita dal 
loop; mentre il ciclo FOR-NEXT si inter- 
rompe solo quando il valore di una certa 
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variabile supera un certo limite, il ciclo 
WHILE-WEND prosegue fintantoché la 
condizione (formalmente simile a quella 
che segue un IF) specificata dopo la pa- 
rola WHILE si mantiene vera. Ciò significa 
che la linea WHILE 1=1: PRINT”X”: 
WEND scriverà un numero infinito di X 
mentre la linea WHILE 1=2: PRINT”X”: 
WEND non ne stamperà nemmeno una. 
La coppia WHILE-WEND consente anche 
di emulare quella FOR-NEXT; le seguenti 
due linee sono infatti equivalenti: 


FOR 1=1 TO 10: NEXT |= 1: WHILE k<= 10: 
|1=1+1: WEND 


S'intende che il contrario non è possi- 
bile: un generico WHILE-WEND non è so- 
stituibile con un FOR-NEXT. Qualcuno si 
chiederà che scopo abbia tentare di usare 
una struttura al posto di un'altra. Natural. 
mente, come risulta evidente dall’esempio 
riportato poco sopra, il rimpiazzamento di 
un ciclo FOR-NEXT con uno WHILE- 
WEND non è mai conveniente in termini 
sia di praticità che di leggibilità, ma un ri- 
spettabile numero di persone in vena di 
semplificazioni ritengono che due strutture 
al posto di una siano ridondanti ed evitano 
sistematicamente il FOR-NEXT nei loro 
programmi, tentando nel contempo con 
tutte le loro energie di convincere chiun- 
que altro che ciò sia indice di buona pro- 
grammazione. Il lettore è consigliato di non 
lasciarsi trasportare ciecamente dai flussi 
e riflussi della moda, esistenti nella pro- 
grammazione come in molte altre attività 
umane, ed è altresì vivamente incoraggia- 
to alla creazione di uno stile personale, 
soprattutto se non desidera che l'eccitante 
attività programmatoria si trasformi rapida- 
mente in una grigia routine. 

AI classico IF-THEN(-ELSE) è stato af- 
fiancato il più flessibile IF-THEN (-ELSEIF- 
THEN)... (-ELSEIF-THEN) (-ELSE) -END IF 
che consente di eseguire in maniera con- 
dizionata interi blocchi di linee alla volta, 
che possono a loro volta contenere altri |F. 
L'interprete identifica la variante di IF (clas- 
sica 0 moderna) che il programmatore in- 
tende usare basandosi sulla presenza o 
meno di istruzioni in linea subito dopo il 
THEN; se infatti tale parola chiave è se- 
guita da una o più istruzioni l'interprete 
decide che si tratta di un IF classico, a li- 
nea singola; se al contrario dopo il THEN 
non si scrive niente deve evidentemente 
trattarsi della variante evoluta multilinea e 
l'AmigaBasic parte dal presupposto che le 
linee successive debbano essere eseguite 
solo se la condizione specificata risulta ve- 
ra. Naturalmente è necessaria l'esistenza 
di una parola chiave per contrassegnare 
la fine del blocco di linee da eseguire con- 
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dizionatamente; tale parola, che deve oc- 
cupare un'intera linea, è END IF. La pa- 
rola ELSE, che esige anch'essa di non 
essere preceduta o seguita da alcunché, 
marca invece l'inizio delle linee che devo- 
no essere eseguite solo se la condizione 
è falsa. AI contrario delle parole IF, THEN 
ed END IF, la cui presenza è obbligatoria, 
l'uso di un blocco introdotto da ELSE è 
opzionale, e altrettanto può dirsi per EL- 
SEIF, utile in caso di scelte multiple. La 
parola ELSEIF, che richiede una condizio- 
ne e un THEN dopo di sè, introduce un 
blocco di istruzioni che verranno eseguite 
solo se l'ultima condizione specificata è 
vera e tutte le precedenti sono false. Ec- 
cone un esempio: 


IF A=1 THEN 
PRINT”UNO” 

ELSEIF A=2 THEN 

PRINT”DUE” 
ELSEIF A=3 THEN 

PRINT“TRE” 
ELSE 

PRINT”NON È UNO, DUE O TRE” 
END IF 


L'indentazione, da qualcuno chiamata 
dentellatura, ossia l'abitudine di lasciare 
all'inizio di ogni riga uno spazio variabile 
in modo da evidenziare i blocchi, non è 
obbligatoria ma molti la consigliano per 
motivi stilistici, trovandola evidentemente 
molto estetica o particolarmente giovevole 
alla chiarezza del listato. Purtroppo quan- 
do si esce dall'ambito dei programmi ba- 
nali accade che all’interno di ogni singola 
procedura il numero di IF, FOR e WHILE 
concatenati sia solitamente abbastanza e- 
levato da far sì che alcune parti del listato 
dimostrino una spiccata tendenza a uscire 
dall'area visibile dello schermo a causa 
della spaziatura iniziale. 

L'AmigaBasic possiede anche il GOTO, 
ma tale direttiva è stata implementata nella 
presente release dell’interprete in una for- 
ma non troppo flessibile; è infatti proibito 
saltare dentro e fuori da una struttura tra- 
mite GOTO, cosa invece consentita da 
qualche altro computer. Non è quindi pos- 
sibile saltar fuori neppure da un banalis- 
simo ciclo FOR-NEXT prima del suo esau- 
rimento: se si desidera farlo occorre asse- 
gnare il valore limite alla variabile indice e 
saltare al NEXT, cosa questa fattibile ma 
indubbiamente alquanto scomoda. 


I dati dei subprogram 


È stato detto nella scorsa puntata che 
le variabili di un subprogram esistono solo 
al suo interno, eccezion fatta per quelle 


dichiarate come SHARED che sono con- 
divise con il programma principale. La pa- 
rola STATIC che compare nella prima li- 
nea di ogni subprogram ha il seguente si- 
gnificato: tutte le variabili locali al subpro- 
gram sono statiche, ossia il loro contenuto 
non viene perso tra una chiamata e l’altra 
del subprogram stesso. 

In realta’ la presenza della parola STA- 
TIC nella definizione di un subprogram è 
obbligatoria e ciò significa che l'AmigaBa- 
sic non supporta le variabili locali non sta- 
tiche. Quest'ultimo tipo di variabile è utile 
per limitare l'occupazione di memoria e 
per implementare algoritmi ricorsivi, cioè 
per consentire che un subprogram possa 
richiamarsi da solo; ciò in AmigaBasic non 
è quindi possibile, a meno di ideare un 
meccanismo che salvi le variabili prima di 
ogni chiamata. Esiste tuttavia un ulteriore 
inconveniente legato alla staticità delle va- 
riabilii com'è possibile utilizzare degli ar- 
ray locali in un subprogram? Se dimen- 
sioniamo l’array in questione nel program- 
ma principale perdiamo il vantaggio della 
località, oltre a essere costretti a dichiararlo 
SHARED; se il DIM compare invece all'i- 
nizio del subprogram i guai iniziano quan- 
do il suddetto viene richiamato per la se- 
conda volta e l'interprete si trova nella sec- 
cante situazione di dover dimensionare un 
array già esistente. Ciò è illegale in Ami- 
gaBasic e provoca il blocco del program- 
ma con segnalazione di errore. Come ri- 
solvere questo problema? 

Sfogliando il manuale qualcuno avrà no- 
tato l'esistenza di un utile comando chia- 
mato ERASE che cancella un array elimi- 
nandolo dalla memoria come se non fosse 
mai esistito. Si può quindi pensare di in- 
serire questo comando alla fine di un su- 
bprogram in modo che alla successiva 
chiamata l'array, assente, possa essere ri- 
dimensionato. Per qualche strano motivo 
questo trucco non sembra funzionare mol- 
to bene; probabilmente il comando ERA- 
SE è stato creato appositamente per gli 
array globali e non funziona sempre su 
quelli locali. Comunque, anche se funzio- 
nasse regolarmente sarebbe un metodo 
troppo inefficiente, in quanto la cancella- 
zione e successivo dimensionamento sono 
operazioni alquanto lente, ed eseguirle o- 
gni volta che il subprogram viene richia- 
mato non sembra essere la soluzione mi- 
gliore. Un trucco più valido consiste nel- 
l'inserzione «all’inizio del subprogram di 
una linea come la seguente: 


IF FLAG=0 THEN FLAG = 1:DIM AR(100) 


La prima volta che il subprogram viene 
richiamato le sue variabili non esistono an 
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cora; FLAG vale quindi zero, come tutte 
le variabili non ancora inizializzate. Alla 
suddetta variabile viene quindi assegnato 
il valore uno e l'array viene dimensionato. 
A ogni successiva chiamata’ del subpro- 
gram la condizione espressa dopo l'|F ri- 
sulterà falsa e non sarà quindi effettuato 
alcun tentativo di dimensionare nuova- 
mente l'array. Se poi all’interno del pro- 
gramma principale viene eseguito un 
CLEAR tutte le variabili spariscono, array 
compreso, ma anche FLAG torna a zero 
e il trucco continua a funzionare. 


Lo statement CLEAR 


L'istruzione CLEAR in ogni versione di 
Basic provoca la cancellazione di tutte le 
variabili, ma in alcuni dialetti essa assume 
un significato piu’ ampio. Nel caso in que- 
stione la suddetta istruzione consente di 
cambiare il modo in cui la RAM viene ri- 
partita tra le sue tre aree fondamentali: lo 
heap, lo stack e il segmento del Basic. Lo 
heap (cumulo) è una sorta di magazzino 
pubblico di memoria inutilizzata al quale 
tutti i programmi attingono secondo le loro 
necessità, dopo aver rivolto una regolare 
richiesta al sistema operativo (a Exec, per 
la precisione); ormai nemmeno i program- 
mi per computer riescono a salvarsi dalla 
burocrazia. Se non altro Exec non insab- 
bia mai le pratiche e si preoccupa di sbri- 
garle nel giro di qualche millisecondo, re- 
spingendole, in un tempo altrettanto bre- 
ve, solo se la memoria è ormai esaurita o 
non possiede le caratteristiche richieste: 
un traguardo di efficienza del tutto fanta- 
scientifico per la burocrazia italiana. Pur- 
troppo certe richieste che devono essere 
rivolte alle sezioni competenti del sistema 
operativo per ottenere determinati risultati 
prevedono la compilazione, da parte del 
programma richiedente, di un vero e pro- 
prio modulo di complessità tale da far in- 
vidia al tristemente noto 740; ma di que- 
sto si tratterà meglio in futuro. Il numero 
che compare nella barra superiore dello 
Workbench indica appunto la quantità di 
memoria ancora disponibile nello heap. 
Ogni programma che gira sull’Amiga pos- 
siede uno stack (pila, catasta) il cui scopo 
è la memorizzazione temporanea di indi- 
rizzi e variabili locali e la cui dimensione 
varia solitamente tra uno e quattro kappa 
di RAM; l'interprete AmigaBasic è esso 
stesso un programma e possiede di con- 
seguenza uno stack. Il segmento Basic è 
quella zona di memoria che l'interprete ha 
sottratto allo heap per destinarla alla me- 
morizzazione del programma Basic e delle 
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sue variabili. La sintassi completa del co- 
mando è CLEAR (,segmento (,stack)), do- 
ve le parentesi indicano, come già in pre- 
cedenza, un parametro che può essere 
omesso. 

L'esperienza insegna che praticamente 
nessuno trova utile alterare la dimensione 
dello stack, mentre molti programmatori 
desiderano aumentare l'esiguo spazio a 
disposizione del Basic, che normalmente 
ammonta a circa 25K. Bisogna innanzitutto 
premettere che non è buona norma asse- 
gnare troppa RAM al segmento lasciando 
al verde lo heap, non solo perché risulte- 
rebbe impossibile il funzionamento in mul- 
titasking di un qualunque altro programma 
assieme all'interprete, ma anche perché 
determinate azioni intraprese da un pro- 
gramma Basic assorbono memoria dallo 
heap; il comando SCREEN per esempio 
definisce un nuovo schermo e preleva dal- 
lo heap la memoria necessaria alla rela- 
tiva pagina grafica. Quando inoltre vengo- 
no eseguite certe operazioni, come lo spo- 
stamento di una finestra con il mouse, il 
computer necessita temporaneamente di 
una certa quantità di RAM per portare a 
termine il compito richiesto e se non la 
trova possono accadere stranezze di va- 
rio genere. 

Il modo più semplice per riservare al 
segmento una certa quantità di RAM con- 
siste nell'eseguire uno statement come 
CLEAR ,100000 (se si desiderano circa 
100K; notate comunque la curiosa quanto 
obbligatoria presenza della virgola). Que- 
sto metodo presenta qualche inconvenien- 
te; il primo consiste nell’impossibilità di al- 
locare ripetutamente più di metà (nel mi- 
gliore dei casi) della memoria disponibile. 
Supponiamo per esempio che su di un 
Amiga inespanso si desideri portare il se- 
gmento a 120K; basta digitare in modo 
diretto CLEAR ,120000 e si è poi liberi di 
creare programmi con array di dimensioni 
veramente notevoli. Quando poi il pro- 
gramma viene salvato e in seguito ricari- 
cato, magari dopo un reset, si scoprirà che 
non funziona più perché l'effetto del co- 
mando CLEAR è svanito, dal momento 
che anche l'interprete è stato ricaricato da 
disco, e non c'è più posto per le variabili. 
Evidentemente è opportuno inserire il 
CLEAR in testa al programma stesso, in 
modo che venga eseguito a ogni carica- 
mento; così facendo, tuttavia, tale coman- 
do verrà eseguito anche a ogni run e ciò 
crea un altro problema, connesso al modo 
in cui l'interprete porta a termine un 
CLEAR. L'AmigaBasic richiederà i 120K 
prima di restituire i vecchi 25K allo heap, 


altrimenti il programma Basic verrebbe 
perso per strada. Per un attimo quindi l’in- 
terprete possiederà 145K. Non c'è niente 
di male in ciò, ma al successivo run l'A- 
migaBasic tenterà di ottenere altri 120K 
prima di mollare i vecchi 120, con esito 
infelice non essendo disponibili 240K di 
memoria. Si può allora ricorrere a un dop- 
pio CLEAR; supponendo che il program- 
main sè (variabili escluse) non richieda più 
di 10K, si può eseguire un CLEAR 
,10000:CLEAR ,120000. In tal modo la 
massima occupazione di RAM in ogni dato 
istante non supera 130K. Esiste poi un ul- 
teriore inconveniente: se l'abbondanza di 
memoria è necessaria non solo per le va- 
riabili, ma per il programma stesso, risulta 
impossibile caricarlo in memoria prima di 
aver eseguito il CLEAR, che a sua volta 
entrerebbe in azione solo dopo il carica- 
mento: il classico serpente che si morde 
la coda. L'unica via di uscita consiste nella 
creazione di un programma di lancio come 
il seguente: 


CLEAR ,5000 
CLEAR ,120000 
LOAD ”nomeprogramma”,R 


Questo microscopico programmino, se 
lanciato in esecuzione, riserva al Basic la 
quantità desiderata di RAM e subito dopo 
carica il programma vero e proprio, atti- 
vandolo al termine del caricamento (l’o- 
pzione R significa Run). Naturalmente non 
è piu necessario includere in quest’ultimo 
programma istruzioni per allocare memo- 
ria, essendo questo compito già svolto dal 
programma di lancio. 

La funzione FRE(x) consente di cono- 
scere in ogni momento il modo in cui la 
RAM è ripartita; il classico FRE(0) fornisce 
la quantità di memoria ancora libera all’in- 
terno del segmento Basic, FRE(-1) la di- 
mensione dello heap, FRE(-2) la quantità 
di RAM nello stack che non è mai stata 
usata. Ogni volta che la funzione FRE vie- 
ne invocata l'interprete esegue il cosiddet- 
to garbage collecting (alla lettera, raccolta 
di immondizia); tale operazione riordina le 
stringhe presenti in memoria in modo da 
riutilizzare gli interstizi che si formano di 
solito durante la loro manipolazione. 

Una piccola curiosità: anche il comando 
CLEAR del vecchio ZX Spectrum ha la 
capacità di variare la porzione di RAM ri- 
servata al Basic! Chissà quanti altri com- 
puter possiedono questa caratteristica così 
assolutamente non standard associata al 
comando CLEAR? 
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Vediamo come sfruttare al meglio gli 
algoritmi visti nel numero precedente, 
presentando così il concetto di polinomi 
a tratti. 


Analizzeremo poi pregi e difetti delle 
migliorie introdotte fino ad individuare 
quella famiglia di curve detta spline, le cui 
proprietà interesseranno certamente non 
solo chi ha problemi di estrapolazione, ma 
anche tutti coloro che desiderano raccor- 
dare con una “dolce” curva i punti di un 
disegno. 
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Problema di instabilità _ 


Il problema dell'interpolazione è, come 
abbiamo visto, quello di trovare una fun- 
zione che simuli abbastanza bene un'al 
tra più o meno nota 

Vediamo di precisare cosa si intenda 
per "abbastanza bene”: ciò che si richie- 
de alla nostra funzione è che in corrispon- 
denza ad ogni valore dell’incognita x as- 
suma un valore f(x) poco differente da 
quello che assumerebbe la funzione che 
si vuole simulare 


SPLINE! 


Non sembri assurdo che si parli di va- 
lore della funzione da interpolare anche 
quando quest'ultima è nota solo in alcun 
punti: infatti, anche se le informazion 
quantitative si limitano a qualche nodo 
generalmente ne conosciamo qualitativa 
mente il comportamento fra un nodo e 
l'altro. Proprio l’idea sull'andamento della 
funzione interpolanda ci mette in guardia 
dalle eventuali anomalie della funzione in- 
terpolatrice 

La volta scorsa abbiamo visto che, per 
quanto comoda, l'interpolazione polino- 
miale non è affatto esente da ‘anomalie 
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comportamentali”. Abbiamo bonariamen- 
te giustificato tale imprevedibile andamen 
to come ribellione del polinomio alla cro- 
cefissione sui nodi. In termini meno sacri. 
leghi possiamo affermare che un polino- 
mio di n-esimo grado può avere n-1 gobbe 
e ventri, che spesso vanno a finire fra i 
nostri nodi causando quelle oscillazioni no- 
te come fenomeno di instabilità di Runge. 

In base a questa analisi (semplicistica, 
ma non per questo sbagliata) possiamo 
concludere che un primo sistema per evi- 
tare, o quanto meno sminuire, l'instabilità 
dell’interpolazione polinomiale sia quello di 
ridurre il grado del polinomio. 
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in un senso che nell'altro (per gli amanti 
della formula 1 una cubica presenta una 
chicane) e c'è un punto a curvatura nulla. 

Prima di proseguire ricordiamo che un 
polinomio di n-esimo grado è determinato 
dai valori di n+1 nodi. 


Polinomi a tratti : introduzione 


Abbiamo appena visto che è prudente 
non utilizzare polinomi di grado troppo e- 
levato; capita però spesso di avere un nu- 
mero di nodi molto maggiore di quello che 
ci consente il polinomio che vogliamo uti- 
lizzare. Pensiamo allora di ordinare i punti 
a disposizione secondo le x crescenti: in 


descritta più avanti, che implementa i me- 
todi appena visti. Se la trattazione degli 
algoritmi non fosse stata abbastanza chia- 
ra consigliamo di provare il programma 
Interpola2 leggendo il paragrafo che lo 
descrive in calce all'articolo. 

Consigliamo di predisporre un'uscita 
grafica per i vostri programmi, in modo 
particolare però questa volta, poiché i gra- 
fici possono consentire un'immediata com- 
prensione del problema. 

Un'altra buona idea è quella di salvare 
(e quindi poter caricare) i dati relativi ai nodi 
sul dischetto per evitare la noia di doverli 
scrivere ogni volta; un sistema più rapido, 
ma solo per fare delle prove, è quello di 


Dall’interpolazione alla computer graphics 
usando i polinomi come pennelli 


di Giovanni Michelon e Luigi Manzo 


Premessa matematica 


Nella speranza che i lettori superstiti alla 
prima puntata di questa serie superino an- 
che lo choc del titolo di questo paragrafo, 
vediamo di introdurre alcuni concetti per 
favorire la comprensione degli algoritmi 
che seguiranno. 

Facciamo intanto notare che spesso si 
confonderà la nozione di funzione con 
quella di grafico di una funzione, cosicché 
diremo retta sottointendendo un polinomio 
di primo grado, o parabola per uno di se- 
condo 0 cubica per uno di terzo. Il riferi- 
mento al grafico permette però una visione 
geometrica, e perciò più familiare, del pro- 
blema algebrico dell'interpolazione. 

Consideriamo ora una curva (fig.1), pre- 
so un suo punto possiamo immaginare di 
trovare un cerchio di raggio opportuno che 
sia tangente alla curva in quel punto e vi 
si adatti meglio di ogni altro: il reciproco 
della misura del raggio si dice curvatura 
della curva nel punto. Per chiarire meglio 
il concetto di curvatura supponiamo che 
la curva sia una strada che stiamo percor- 
rendo a bordo di un'automobile: giunti al 
punto prescelto blocchiamo lo sterzo, la 
macchina descriverà (burroni ai margini 
permettendolo) una circonferenza il cui 
raggio esprimerà la curvatura cercata. E 
ovvio che se una strada... una curva ha 
tutti i punti a curvatura nulla sarà rettilinea. 

Presa una parabola notiamo che ha cur- 
vatura sempre dello stesso segno, si 
“’sterza” cioè sempre nello stesso verso; 
una cubica invece presenta curvatura sia 
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funzione del valore da estrapolare si scel- 
gono dei nodi contigui in numero oppor- 
tuno e quindi (col programma Interpola 
magari) si procede all'estrapolazione. 

Questo è un metodo senz'altro corretto 
ma piuttosto noioso da effettuare a mano 
più di una volta. Nulla ci vieta però di fare 
una scelta una volta per tutte e poi lasciare 
al calcolatore il compito di arrangiarsi! Ciò 
che ci proponiamo di fare è suddividere il 
nostro insieme ordinato di nodi in un certo 
numero m di sottoinsiemi contenenti cia- 
scuno n+1 nodi: diciamo tratti ugnuno di 
questi sottoinsiemi; ogni tratto avrà in co- 
mune coi tratti adiacenti un nodo (vedi 
fig.2), il numero di nodi in totale sarà 
m"n+1. Pensiamo di numerare i nodi da 
Oam*n: il generico tratto k (con k da 1 
ad m) sarà individuato dai nodi xn(n*(k- 
1)) e xn(n*k) e comprenderà i nodi fra 
questi. 

Sul singolo tratto si procederà poi all'e- 
strapolazione con un polinomio di grado 
(avrete senz'altro capito) n. 

Assegnato dunque il numero totale dei 
nodi a disposizione e l'ordine del polino- 
mio da utilizzare ci si calcolerà il numero 
di tratti, scartando, eventualmente, alcuni 
nodi (per esempio fra gli ultimi) nel caso 
che m non risulti un intero. 


Suggerimenti 


Per la realizzazione di vostri programmi 
potete usare le subroutine del programma 
Interpola visto nel numero precedente: ne 
proponiamo qui una seconda versione, 


inserire delle funzioni che forniscano i nodi, 
funzioni che andranno richiamate ogni 
qual volta si definisce l'insieme dei dati. 

L'uso di una funzione predefinita può 
essere utile per un confronto con l’inter- 
polante a tratti, potete così rendervi conto 
dell'errore che si commette con una scelta 
del grado del polinomio anziché con un'al- 
tra. 


Commento ai risultati 


Usando il metodo proposto potrete no- 
tare un comportamento come quello di 
fig.3. Dividendo in tratti l'insieme dei nodi 
abbiamo si evitato l'instabilità legata ad 
ordini polinomiali troppo elevati e limitato 
perciò gli errori di approssimazione, ma 
ottenuto lo sgradevole effetto degli spigoli 
agli estremi di ogni tratto. Questi spigoli 
sono dovuti alla perdita di informazione 
sull'andamento globale della funzione de- 
scritta dall'insieme completo dei nodi: tale 
perdita di informazione è dovuta, purtrop- 
po, proprio alla suddivisione in tratti. 

Sembra proprio che ci siamo dati la zap- 
pa sui piedi! Prima di farci prendere dal 
più completo sconforto rianalizziamo i ri- 
sultati ottenuti ed anche il problema stesso 
dell’interpolazione. 

Innanzitutto, abbiamo un metodo stabile 
e possiamo perciò controllarne gli errori: 
ciò che ci disturba è lo spigolo ai bordi di 
ogni tratto, quello che geometricamente si 
vorrebbe ottenere è invece una curva 
quanto più “liscia” possibile. Con riferi- 
mento alla fig.4 possiamo imporre che il 
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tratto | 
—___—_—__ ___+ 


Possiamo adottare tecniche migliori: an- 
ziché imporre una tangente prefissata agli 
estremi imponiamo che i polinomi su tratti 
adiacenti abbiano nei nodi di confine la 
stessa tangente (non una prefissata!). 

Si notino le differenze fra i tre metodi fin 
qui accennati: 

— il primo frantuma l’insieme dei nodi 
dimenticando ogni legame fra tratto e trat- 
to; 

— il secondo (Hermite) richiede altre 
informazioni, che ottiene in qualche modo, 
ma garantisce l'assenza di spigoli; 

— Il terzo elimina gli spigoli imponendo, 
attraverso le tangenti, un legame fra i tratti. 

Gli ultimi due metodi si possono gene- 
ralizzare: anziché richiedere solo che le 
tangenti siano uguali si può imporre che 
anche la curvatura sia la stessa. Per chia- 


tratto n 
«——T +- 


m(8) wall) = anon) 


polinomio interpolante sul generico tratto 
abbia una tangente prefissata sui nodi ai 
margini, tali ulteriori condizioni alzano di 
due il grado del polinomio (è questa la 
cosidetta interpolazione alla Hermite). 
Con questo metodo otteniamo si i van- 
taggi dell’interpolazione a tratti ed evitiamo 
gli spigoli, però dobbiamo fornire in più i 
dati relativi a tutte le tangenti nei nodi che 
sono estremo di tratto. Però potremmo non 
possedere tali informazioni (si pensi ai dati 
estratti da una tabella) oppure cercare in 
qualche modo di desumerle dai nodi a- 
diacenti a quelli limite di tratto o magari 
fissarle a priori (il metodo basato su que- 
st'ultima tecnica fissa le tangenti orrizzon- 
tali ed ottiene buoni risultati, si parla di 
metodo di Fejer). Noi non descriveremo tali 
metodi poiché richiedono una certa dime- 
stichezza con la matematica che esula dal- 
le pretese e dagli scopi di questo articolo. 
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Fig. 2 
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rire meglio questo discorso si osservi la 
fig.5, si ha un raccordo fra una retta ed 
un arco di circonferenza; nel punto di rac- 
cordo la tangente è ovviamente la stessa 
(coincide con la retta), la curvatura però è 
diversa subito prima e subito dopo il rac- 
cordo, si passa cioè da una curvatura nulla 
a quella data dal reciproco del raggio della 
circonferenza. Nel nostro gergo automo- 
bilisico è come se ci trovassimo a dover 
sterzare di colpo, anziché con gradualità, 
all'ingresso nella curva: potremmo dire 
che la curva in quel punto non è “liscia”. 

Siamo così giunti al variopinto mondo 
delle: 


Fig. 4 





Fig. 5 
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Fig. 6 
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Spline 


Da quanto detto finora emerge già una 
descrizione delle spline: sono curve poli- 
nomiali a tratti con condizioni opportune 
agli estremi di ogni tratto tali da renderle 
“liscie” e da evitare che i singoli tratti ri- 
sultino slegati. 

Queste proprietà le rendono particolar- 
mente simpatiche ed utili per la computer 
graphics poiché risolvono molto bene il 
problema del disegno di profili curvilinei. 

In questo articolo discuteremo solo delle 
proprietà, del metodo di calcolo e dell’im- 
piego delle spline: una trattazione teorica 
esauriente, anche se non complessa, ri- 
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Coefficienti Spline Naturali 


È 
2° (h(B)#hC1)) 
hC1) 


h(1) 
2'(h(1)+h(2)) 


Coefficienti Spline Periodiche 
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Ternini Noti Spline Naturali 
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chiederebbe troppo spazio su queste pa- 
gine e strumenti matematici non immedia- 
tamente comprensibili, riportiamo allora in 
fine articolo un minimo di bibliografia per 
coloro che desiderassero una esposizione 
più tecnica. 

Parleremo delle spline cubiche, cioè il 
polinomio interpolante sul singolo tratto 
sarà di terzo grado. Non sembri limitativa 
questa scelta, di fatto le spline cubiche 
sono le più usate sopratutto per la grafica 
al calcolatore; il terzo grado è anche il mi- 
nimo possibile per una spline. Vediamo 
allora come è fatta: ogni tratto ha solo due 
nodi, cioè è composto dai soli nodi di e- 
stremo; su ogni tratto si ha un particolare 
polinomio di terzo grado che ha, come 
deve essere, le stesse tangenti e le stesse 
curvature dei polinomi dei tratti adiacenti 
nei due nodi. Rimangono però il primo e 
l'ultimo nodo dell'insieme di tutti i nodi; su 
questi due punti si assegnano valori a prio- 
ri per la tangente e per la curvatura. Si 
usano due tipi di spline cubiche a seconda 
delle condizioni imposte su tali nodi: 

— naturali: impongono che la curvatura 
sia nulla; 
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— periodiche: impongono stessa cur- 
vatura e stessa tangente. 

Tratteremo due diverse rappresentazio- 
ni delle spline cubiche, la prima più sem- 
plice e adatta all'interpolazione la seconda 
più complessa ma che meglio si adatta ai 
problemi di natura grafica. 

Prima di procedere alla descrizione dei 
metodi di calcolo è opportuno far notare 









Fig. 7 
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B-spline naturale 
(4 punti il primo e l’ultimo coincidono) 


che i pregi delle spline si pagano con una 
maggior mole di conti, può però valerne 
la pena! 


Spline per l’interpolazione 


Supponiamo di aver numerato i nodi da 
O ant (si noti che il numero dei tratti (nt) è 
uguale al numero dei nodi meno uno), 





B-spline periodica 


TNFORMATICA | 


numeriamo pure i tratti da 0 a nt-1, il po- 
linomio sul generico tratto k sarà dato dalla 
formula 1 di fig.6 dove t assume i valori 
fra gli estremi del tratto, le altre costanti 
hanno il significato scritto in figura; le s1(k) 
si calcolano con la formula 2, le s2(k) si 
calcolano invece risolvendo uno dei due 
sistemi di equazioni lineari: uno per il caso 
naturale e l'altro per quello periodico. Di 
tali sistemi riportiamo solo le tabelle dei 
coefficienti e dei termini noti assumendo 
che le variabili siano nel primo caso s2(1) 
fino a s2(nt-1) con s2(0)= s2(nt)= 0 (curva- 
tura nulla agli estremi) e nel secondo s2(0) 
fino a s2(nt-1) con s2(nt)=s2(0) e 
s1(nt)=s1(0) (stessa curvatura e stessa 
tangente agli estremi). 

Per chi sa un po’ di matematica, non 
sarà difficile riconoscere il polinomio di Ta- 
ylor. 


x(K} 


v(k) 


Coefficienti B-spline naturali 
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Il modo di procedere è allora il seguen- 


te: 


— assegnati i nodi, si calcolano le am- 


piezze dei singoli tratti, 
— con queste ed i valori dei nodi si co- 
struisce il sistema, 


— risoltolo si ottengono le costanti s2(k) 
(tenendo conto delle condizioni iniziali), 
con k da 0 ad nt, 


— da queste si ricavano con la formula 
2 le costanti s1(k), per k da 0 a nt. 


Abbiamo così tutte le costanti necessa- 
rie per tutti gli nt polinomi di terzo grado 
nella variabile t. 

La spline si traccia tratto per tratto o si 
calcola nel singolo punto dopo aver iden- 
tificato il tratto cui appartiene. 


nt] 


Fig. 8 
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B-spline 


È questo il nome dato alle spline cubi- 
che quando si passa ad una particolare 
rappresentazione che permette di trattare 
"curve piane «generalmente regolari”. 

Per ottenere una qualunque di queste 
curve dal nome tanto lungo si procede nel 
seguente modo: ci si munisce di carta e 
penna e si traccia una qualunque curva 
senza spigoli venga in mente, senza sol- 
levare mai la penna dal foglio; l'intersezio- 
ne con archi di curva già tracciati è lasciata 
alla libera iniziativa del lettore. 

Immaginiamo di fissare dei punti rap- 
presentativi (che chiameremo nodi, tanto 
per cambiare) su questa curva man mano 
che la tracciamo; siano tali punti in numero 
di n numerati da 1 ad n: i punti coincidenti 
tracciati in momenti successivi si devono 
contare. Diremo che la curva è chiusa se 
il primo e l'ultimo nodo coincidono. 

Se i punti sono stati scelti bene, allora 
la B-spline (o spline base) ripercorrerà la 
curva da voi tracciata. 

Per una B-spline sono necessari, come 
per le spline viste prima, almeno due punti: 
il primo e l'ultimo. Anche qui si hanno due 
tipi di B-spline che potremmo chiamare 
ancora naturale e periodico poiché impon- 
gono agli estremi le medesime condizioni 
viste prima; in fig.7 sono riportate due B- 
spline sugli stessi quattro nodi (la curva è 
chiusa!) una naturale ed una periodica. 


Coefficienti B-spline periodiche 
. 0-1 1 | 


1 
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Fig. 9 
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Fig. 10 


Il calcolo delle B-spline è leggermente 
più complicato di quello delle spline sem- 
plici ma.... ne vale la pena! 

Per fissare le idee bisogna far notare 
che ora, occupandoci di una curva piana, 
non possiamo più ritenere, in generale, 
che la y sia funzione della x: abbiamo bi- 
sogno di un'ulteriore incognita t. Se il di- 
scorso non vi è chiaro, potete pensare che 
la t sia il tempo e x(t), y(t) siano le coordi- 
nate del punto tracciato dalla vostra penna 
all'istante t. Diremo parametrica tale rap- 
presentazione della curva, il parametro è 
ovviamente t. Indicheremo (vedi fig.8) con 
x(k) il generico punto, la sottolineatura (in 
figura) serve a ricordare che x è un punto 
del piano ed ha quindi due coordinate: 
ascissa e ordinata. Per costruire la B-spline 
si devono trovare dei parametri v(k) (anche 
questi punti del piano); i v(k) sono in nu- 
mero di n+2, numerati da 0 ad n+ 1, tali 
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due punti in più servono per fissare le 
condizioni iniziali: spline naturale o perio- 
dica. Anche qui per trovare i v(k) si deve 
risolvere un sistema, uno per il caso na- 
turale ed uno per il caso periodico. Ripor- 
tiamo in fig.9 i coefficienti dei due sistemi, 
i termini noti sono i valori dei nodi x, le in- 
cognite sono v(1) fino a v(n), v(0) e v(n+1) 
si ottengono come riportato nella stessa 
figura, le somme ed i prodotti vanno intesi 
ascissa con ascissa ed ordinata con ordi- 
nata. In realtà ognuno di questi sistemi è 
un sistema per le ascisse ed uno per le 
ordinate di v ed x; poiché i coefficienti non 
cambiano è conveniente risolvere il siste- 
ma in parallelo per ascisse ed ordinate ot- 
tenendo così un buon guadagno in tempo 
di esecuzione. 

Come prima le B-spline vanno tracciate 
fra un nodo e l'altro, in fig.10 è riportata la 
formula vettoriale per il calcolo del singolo 





punto in dipendenza dal parametro t, che 
varia fra 0 ed 1 su ogni tratto. Poiché la 
formula non è di immediata comprensione 
è riportato l'algoritmo di calcolo nella stes- 
sa fig.10. Prima di passare alla descizione 
dei programmi facciamo notare che la par- 
te della formula di fig.10 che non dipende 
da t è costante sul singolo tratto, per cui 
conviene calcolarla prima di tracciare i 
punti del tratto. 


Descrizione dei programmi 


Interpola2 è la versione modificata di 
Interpola con l'introduzione delle spline. 
Come la versione precedente, permette di 
effettuare estrapolazioni, ma, cosa interes- 
sante dal punto di vista di chi si avvicina 
per la prima volta a problemi interpolatori, 
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permette di avere un confronto immediato 
fra la funzione interpolanda e quella inter- 
polatrice attraverso i loro grafici. 

Una volta lanciato, il programma chiede 
il numero dei tratti e dei nodi sul tratto, ri- 
cordandovi che questo è due se poi vo- 
lete usare le spline, e il modo in cui volete 
inserire i nodi: 

— l'inserimento manuale porta ad un 
ciclo in cui si richiedono i nodi da tastiera; 

— l'inserimento da funzione porta a ri- 
cavare i nodi dalla funzione definita nelle 
prime linee del programma; vi verranno 
prima richiesti il primo e l’ultimo nodo, i 
rimanenti saranno ricavati in modo che | 
nodi risultino equidistanti. 

Viene poi presentato un menù che vi 
permette di scegliere il metodo; a questo 
punto potete optare per un'uscita grafica 
o numerica, nel primo caso si richiedono 
gli estremi iniziali e finali per l'interpolazio- 
ne (è buona norma che siano inclusi fra il 
primo e l’ultimo nodo), il passo di calcolo 
per il grafico ed un fattore di scala per le 
ordinate (tale fattore è valutato automati- 
camente per le ascisse); il passo di cal- 
colo è l'incremento della variabile x; il fat- 
tore di scala richiesto si calcola dividendo 
per cento il massimo valore assoluto delle 
ordinate. Potete notare che i nodi che sono 
margini di tratto sono evidenziati con delle 
crocette. 

Nel caso di uscita numerica si chiede il 
valore da estrapolare e quindi viene for- 
nito il risultato; se non volete calcolare un 
altro valore premete il tasto u. Nota Bene: 
il programma prevede che si utilizzino solo 
le lettere minuscole. 

Vediamo ora una breve descrizione del 
funzionamento di Interpola2: c'è un corpo 
principale che si occupa dell'ingresso dei 
dati e di coordinare i sottoprogrammi di 
calcolo. | sottoprogrammi NEWTON e NE- 
VILLE sono quelli di Interpola: c'è solo la 
variabile b che serve a identificare il primo 
nodo di ogni tratto. Per quanto riguarda 


DIM SHARED xn(80),yn(50) 
DIM SHARED Nwl 0) ,P( 50) 

DIM SHARED A( 50,850) ,b(50) 
DIM SHAREO s1(50),s2(50) 


* Valori dei nodi 


LOCATE 4,20 : 
LOCATE 6,20 : 


LOCATE 8,20: 


INPUT “Numero tratti 
INPUT 


neNumNodi-1 : meNumTratti 
IF Modeins$="m" THEN 
lin=10 
FOR j=0 TO men 
LOCATE lin,20 
LOCATE lin,40 : 
LOCATE lin,50 


PRINT USING"Nodo #4"; 


INPUT "x “;xn( 4) 
INPUT “"y ";iyn( 1) 





* Vettori per Newton e Neville 
* Tabelle coefficienti, 
* e costanti per le spline 


“Numero nodi per tratto (Spline=2) 
INPUT "Inserimento M)anuele F)unzione 


le spline c'è un primo modulo DISPONI 
che prepara la tabella dei coefficienti e dei 
termini noti (si faccia attenzione alle diffe- 
renze indotte dalla variabile fspl) e, dopo 
aver chiamato un sottoprogramma che ri- 
solve il sistema e calcola le costanti s2, 
prepara anche le costanti s1. Terminato 
DISPONI si calcola il valore della spline 
scelta con il sottoprogramma SPLINE. 

ll secondo programma si chiama B- 
spline e si pilota interamente col mouse; 
col tasto menù del mouse potete selezio- 
nare le seguenti opzioni: 

— ClrScr = cancella lo schermo; 

— New = fa ripartire il conteggio dei 
nodi; 

— Aperta/Chiusa = indica il tipo di B- 
spline che verrà tracciata, aperta sta per 
naturale e chiusa per periodica; per sce- 
gliere una o l’altra di queste opzioni sele- 
zionate col tasto menù finché viene indi- 
cato il modo che desiderate; 

— Trace = traccia la B-spline: è abili- 
tato solo dopo che sono stati inseriti tre 
nodi; 

— End = termina il programma. 

Per fissare un nodo si usi il tasto sini- 
stro, una crocetta segnalerà il nodo sullo 
schermo; i nodi vengono inseriti automa- 
ticamente in una tabella. Il programma 
stampa la posizione della freccetta e il nu- 
mero dei nodi già inseriti. 

Il programma è dimensionato per un 
massimo di ventinove nodi, ma dovrebbe 
esservi facile cambiare tale valore. 

Per quanto riguarda il flusso del pro- 
gramma c'è un modulo principale che non 
fa quasi niente, aspetta infatti che voi 
‘clickiate” qualcosa. La subroutine DI- 
SPONI prepara il menù discendente; le 
altre due subroutine SCELTA e NODO si 
occupano rispettivamente del tasto destro 
e sinistro del mouse. L'algoritmo di calcolo 
e tracciamento è contenuto nel modulo 
TRACE, il quale prima prepara le tabelle 
dei coefficienti, poi risolve i sistemi e quindi 


lineline1? : 
NEXT | 
ENO I 
IF Modeins$="f" THEN 
LOCATE 10,20 : 
2 È 
termini noti LOCATE 12,20 : 


FOR j=0 TO men 


"nf gs) *«NInf*h®j1 


NEXT J 
ENO IF 


Cus 

LOCATE 12, 
LOCATE 14, 
LOCATE 16, 


PRINT 
PRINT 
PRINT 
: PRINT 
INPUT 


"iNumTretti 
“*NumNodi 
"iModeins$ 


LOCATE 38, 
LOCATE 20, 
cus 

LOCATE 4, 
IF ModeCato$="g" THEN 


INPUT 


LOCATE 8,20 
LOCATE 10,20 
LOCATE 12,20 
LOCATE 14,20 


IF lin>23 THEN CLS : 


INPUT 
he(NSup-NInf)/(="n) 


INPUT 
INPUT 
INPUT 
INPUT 





traccia la B-spline. Se non vi sono chiare 
le notazioni per il calcolo delle B-spline 
forse osservare il sottoprogramma PRE- 
PARA e TRACCIA potrà facilitare la vostra 
comprensione. Il lettore più smaliziato non 
dovrebbe avere grosse difficoltà a modi- 
ficare e rendere più gradevole l'uscita gra- 
fica di B-spline (magari congiungendo i 
punti...). 


Conclusioni 


Sperando che dedichiate un po’ di tem- 
po ad Interpola2 invece che divertirvi solo 
con B-spline, vi facciamo notare che in 
tutto questo articolo si è parlato di sistemi 
lineari di equazioni (fate attenzione i sistemi 
visti qui e l'algoritmo, che li risolve, sono 
particolari!) senza spiegare come si risol- 
vono con un calcolatore. Dipenderà dal- 
l'interesse suscitato la trattazione di que- 
sto argomento in un prossimo articolo. 


Bibliografia per l’interpolazione 
a tratti e le spline 


Josef Stoer 
Introduzione all'analisi numerica Vol.1 
edizioni Nicola Zanichelli Bologna 1974 
Marco Cugiani 
Metodi dell'analisi numerica 
edizioni U.T.E.T. Torino 1972 

N.B: su questi due libri non sono de- 
scritte le B-spline, non ci è noto un testo 
italiano, o tradotto, che ne parli. Il primo 
testo è piuttosto completo, richiede una 
buona conoscenza della matematica e la 
capacità di realizzare autonomamente gli 
algoritmi descritti. Il secondo, di più age- 
vole lettura, si presta meglio per un primo 
approccio; purtroppo non descrive le spli- 
ne. Questi due testi dovrebbero essere fa- 
cilmente reperibili in una biblioteca. 


lin=s4 


INPUT “Nodo inferiore 


"Nodo superiore 


"yn( 3) *FN f(xn( 1)) 


"a) Neuton” 

"b) Neville" 

“"c) Spline naturali" 

"d) Spline Periodiche"” 

"scelta (0-d) ";net$ 

"G)rafico V)alore "iModeCale$ 
3EInf 


“Estremo inferiore È 
";ESup 


"Estremo superiore 
"Passo rgrofico 
"Fattore di scala verticale 


:PGra 
if 
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GOSUB traccia 
END IF 
IF ModeCalc$="v" THEN 
o$="* 
WHILE c$e>"u" 
LOCATE 8,20 : INPUT “Valore x 
LOCATE 12,20 : PRINT "Aisultato 
GOSUB calcola 
INPUT “*u* per uscire ";c$ 


END SUB ‘crocette 


calcol 


IF met$=-"0" OR met$="b" THEN neNumNodi-1 
IF met$="c" THEN fsepi=1t : neNunTretti 
IF met$="d" THEN fspl=0 : neNumTratti 


IF met$="a"” ORA met$="b" THEN ‘newton £ neville 
tratto=! 
WHILE x<xn((tratto-1)*n) 
tretto=trattos! 
WENO 
b=(tretto-1)*n 
IF met$="a" THEN 
CALL newton(=) ‘calcola newton 
PRINT net 
ELSE 
CALL neville(x) ‘calcola neville 
PRINT new 
END IF 
END IF 


IF met$="c" DA met$="d" THEN 
CALL disponi 
k=e0 
WHILE x<an( kh) 
hekei 
WEND 
CALL splinelx,k) 
PRINT spi 
ENO IF 
RETURN ‘calcola 


‘osconcsesconscoesccosocesocc—» ocsoosooconconcone—cccooecosononee 


‘colcola spline 


SUB nevilie(x) STATIC 
SHARED xn,yn,n,nev,b 
FOR i-0 TO n 

P(1)=yn{ seb) 
NEXT i 
FOR het TO n 

FOR i-0 TO n-k 

P(1)=( (m-xn(i+heb))®P(1)-(n-xn(10b))®P(£+1) )/( 

nl i*sb)-an(i+heb) ) 

NEXT i 
NEXT A 
nav=P( 0) 
END SUB ’neville 
SUB coeff STATIC 
SHARED xn,yn,Nw,n,f1,b 
FOR 1*0 TO n 

Nu i)eyn(i*b) 
NEXT i 
FOR K=1 TO n 

FOR i-n TO A STEP -1 

Nw(1)"=( Nu 1) -Nuw( 3-1) )/( xn(ieb)-anf(i-heb) ) 

NEXT £ 

NEXT h 
" coefficienti calcolati 


*interpole? 


" OCRA met$="b" THEN neNumNodi=-1 

ce" THEN fspl=t : neNumTratti 
IF met$="d" THEN fepl=0 : neNumTratti 
(h=600/(ESup-EInf) 


IF met$-"a” OR met$="b" THEN 
FOR tratto=! TO NumTratti 
be(tratto-1)*n 
CALL crocettal(b) 
FOR «=“xn(b) TO «n(ben) STEP PGra 
IF met$-"a" THEN 
CALL newtoni x) "traccie newton 
CALL punto(x,nwt,1) 
ELSE 
CALL neville(x) 
CALL punto(x,nev,1) 


‘neston © neville 


"traccia neville 


END IF 
IF Modeins$="f" THEN CALL punto(x,FN (x) ,3) 
NEXT « 
fiso *ricalcola i coefficienti di newton 
NEXT trotto 
CALL crocettal(NumTratti) 
ENO IF 


IF met$="c" ORA met$="d" THEN 
CALL disponi 
FOR h=0 TO n-1 
crocetta(h) 
FOR xexn(A) TO a«n(h+1) STEP PGra 
CALL splinelx,h) 
CALL punto(x»,spl,1) 
IF Modeins$="f" THEN CALL punto(x,FN #(x),3) 
NEXT x 


*traccia spline 
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CALL crocettaln) 
END IF 
RETUAN ‘traccia 


$UB punto(x,y,c%) STATIC 

SHARED EInf,fh,fvw 
h=INT(10*(x-EInf)®fh) 
w=eINT(300-y®fvw) 
PSET (h,v),0% 

END SUB “punto 

SUB crocettal(NodoTratto) STATIC 

SHARED xn,yn,EInf,fh,fw 
h=INT(10+(xn(NodoTratto)-EInf)*fh) 
w*INT( 100-yn(NodoTratto)*fv) 
LINE (h-2,v)-(he2,wv),2 
LINE (h.wv=2)-(h,w+2),2 


ENO SUB ‘coeff 

fanno nanenena ne ncnaneonono ________o- o 
SUB newton( x) STATIC 
SHARED sn, Nw,n,fl,nwt.b 

IF fl=0 THEN CALL coeff 
auNu( n) 

FOR Ken-î1 TO O STEP -1 

SeNu( A) +(x-xn(h*b))®s 

NEXT k 

nut=s 
ENO SUB 
SUB disponi STATIC 
SHARED A,xn,yn,b,s1,s2,n,fspl 


FOR s-0 TO n * azzera lo tobella dei coefficienti 
FOR {=°0 TO n 
Ai, 5) *0 
NEXT j 
NEXT i * calcolo la tabella (linee seguenti) 


hO=xn( 1) -xn(0) : ht=exn(2)-xn( 1) 

A(1,1)=2*(h0+h1) : A(1,2)=ht 

D( 1) =6*( (yn(2)-yn( 1))/h1-(yn(1)-yn(0))/n0 } 

hO-ht 

FOR i=2 TO n-2 
Biexn(4+1)-xn(1) 
Ai, i-1)=h0 : Ali,i)=2*(hO+h1) : A(i,i+1)=h1 
bi) =6%( (yn(i1+1)-yn(1))/ht-(yn(i)-yn(i-1))/h0 ) 
hOh1 

NEXT i 

hiexn(n)-xn(n=-1) 

A{n-1,n-2)=h0 : A(n-1,n-1)=2*(h0+h1) 

b(n-1)=6%( (yn(n)=yn(n=1))/h1-(yn(n-1)-yn(n-2))/n0 ) 


IF fapl=0 THEN * aggiunge coefficienti per le spiine periodiche 
hO=xn( 1) -xn(0) : hi=xn(n)-xn(n-1) 
A(0,0)=2*(h0eh1) : A(0,1)-h0 : A(0,n-1)=ht 
A{1,0)=h0 : A(n-1,0)«hî 
b(0)=6*( (yn(31)-yn(0))/h0-(yn(n)-yn(n-1))/ht ) 
END IF 


CALL risolvi * risolve il sistemo 


IF fapl=0 THEN * spline periodiche 
s2(n)=s2(0) 
ELSE * spline natureli 
s2(0)=0 
s2(n)=0 
END IF 


FOR $4=0 TO n-1 * celcola le costanti sì 
hiexn(i+1)-xn(1) 
sI1)=( ynl1+1)-yn(£) )/h1-( 2982(1)+02(1+1) )®h1/6 
NEXT i 


ENO SUB *’disponi 


$UB risolvi STATIC 


SHARED A,b,82,n risolve il sistemo 
FOR Kefapl+1 TO n-1 
FOR i-h TO n=î 
FOR jeh TO n-1 
Mi, 3) SA(1, 3) -AC1,h=1) SA{h=1,3)/A(h-1,h=1) 
NEXT 3 
D(1)=b(1)-A(1,h-1)*b(h-1)/A(h-1,h=1) 
NEXT i 
NEXT A 
#2(n-1)=b(n-1)/A(n-1,n-1) 
FOR ien-2 TO fspl STEP -t 
sebl 4) 
FOR jei*1 TO n-1 
s"s-82( 4) *A(1,4) 
NEXT J 
5201) =s/A(1,1) 
NEXT i 


ENO SUB ‘risolvi 


SUB spline(x,h) STATIC 
SHARED yn,xn,s2,81,n,spl 





d —an(h) 

spl=( s2(hkhe1)-s2(h) )/6/( xn(het)-xn(h) )*dx 
spl=(s2(h)/2+spl)*dx 

sple(s1(h)+spl)*dx 

spl=yn(k)+spl 





END SUB “spline 


lancoscoscooooconc—oocose——oneove————-e 





SOFTWARE 


di Giorgio Dose 


All’inizio degli anni sessanta i linguaggi 
per computer erano poco conosciuti e 
comprensibili solo da coloro che li avevano 
studiati per anni. Con l'aumentare dell’in- 
teresse, soprattutto da parte degli studenti, 
verso la programmazione e l'uso dei com- 
puter, si avvertì la necessità di disporre di 
un linguaggio di programmazione di facile 
apprendimento e di semplice utilizzo. Dalle 
menti fervide di un gruppo di studenti a- 
mericani e dei loro professori uscì uno dei 
primi linguaggi interattivi per computer: il 
BASIC, the Beginners All-purpose Symbo- 
lic Instruction Code. 

Da allora il Basic ha fatto molta strada 
e si può senz'altro affermare che è diven- 
tato il linguaggio più popolare e che la sua 
immediatezza d'uso ha contribuito non po- 
co alla diffusione dei computer. Con l’im- 
plementazione del linguaggio nella memo- 
ria ROM e con la possibilità di usare il re- 
gistratore a cassette per la conservazione 
dei dati, la vendita dei microcomputer ha 
preso letteralmente il volo. 

Un uso sempre maggiore di questo lin- 
guaggio sulle macchine più disparate 
portò inevitabilmente il Basic originale a 
subire notevoli cambiamenti. | progettisti 
di software creavano continuamente nuo- 


ve funzioni per aumentarne la flessibilità e 
per sopperire alla sua innata lentezza. Ben 
presto i dialetti del Basic differirono sem- 
pre di più uno dall'altro e, nonostante che 
alcuni di essi, come il MicrosoftBASIC, sia- 
no diventati molto popolari, esiste ancora 
oggi una elevata incompatibilità tra i vari 
sistemi. 

Un programma, ad esempio, scritto per 
un computer con una risoluzione grafica 
di 200x200 pixel non potrà mai funzionare 
su un computer con grafica ad alta riso- 
luzione senza che per questo vengano ap- 
portate notevoli modifiche. 


TrueBASIC 


Visti i molti dialetti del Basic, l'American 
National Standards Institute nominò una 
commissione che potesse esaminare i pre- 
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gi e i difetti di ognuno. Prendendo il me- 
glio dei vari dialetti venne creato uno stan- 
dard che avrebbe dovuto portare il Basic 
al state-of-art dei linguaggi per computer. 

Uno dei membri della commissione era 
Tom Kurtz che, con l'aiuto di John Kemeny 
e altri studenti, aveva ideato il linguaggio 
Basic originale. Gli stessi progettisti, atte- 
nendosi alle norme dello standard ANSI, 
svilupparono anche il TrueBASIC. È que- 
sto un linguaggio ideale per l'Amiga per- 
ché pur permettendo vecchi costrutti, co- 
me i numeri di linea e i vari GOTO e GO- 
SUB, possiede alcune delle più avanzate 
strutture come SELECT CASE, DO-LOOP, 
DO-WHILE e DO-UNTIL. Il TrueBASIC è 
trasportabile; ogni programma scritto con 
questo linguaggio sull’Amiga può funzio- 
nare su un Macintosh o IBM, ad esempio, 
senza alcuna modifica, compresa la parte 
grafica. 


L’Editor 


L'editor è di grandissimo aiuto nella 
scrittura dei programmi. Sia il TrueBASIC 
che l'AmigaBASIC lavorano a tutto scher- 
mo ma l'editor del TrueBASIC è più ve- 
loce e più facile da usare. 


serisce nel programma immediatamente 
dopo la linea corrente. 

Keep Cancella tutte le linee tranne quel- 
le del blocco specificato. 

Edit Visualizza, nella finestra di editing, 
solo le linee del blocco desiderato. 

Move to block Muove il cursore al bloc- 
co (subroutine) definito con un nome. 

Compile Salva il programma in forma 
compilata su un disk file; questo riduce la 
lunghezza del programma ed aumenta la 
velocità di esecuzione. 

L'editor ha in sè tutte le caratteristiche 
di un word-processor ed infatti alcuni dei 
file di testo presenti sul dischetto sono stati 
scritti usando l'editor. 


Finestre 


Il TrueBASIC si presenta con tre finestre: 
Command, Source e Output con le quali 
è facile scrivere, eseguire e correggere i 
programmi. 

Source è la finestra nella quale viene 
scritto il programma; l'editor a pieno scher- 
mo ed i menu fanno parte di questa fine- 
stra. 

Command è la finestra nella quale si in- 


FINALMENTE 
UNO STANDARD PER IL BASIC! 


L'editor del TrueBASIC è ricco di sva- 
riati gadgets. Molto importante è la fine- 
stra dei messaggi d'errore che compare 
nella parte inferiore dello schermo ed ha 
le dimensioni di una linea di testo. La fi- 
nestra è normalmente vuota e cambia co- 
lore quando viene visualizzato il messag- 
gio d'errore. Contemporaneamente il cur- 
sore si posiziona alla linea causa dell’er- 
rore. La finestra può contenere fino a 5 
messaggi ma può visualizzare solo uno di 
essi alla volta. È necessario clickare sulla 
finestra per far comparire il messaggio suc- 
cessivo. 

L'editor dispone delle normali funzioni 
quali scroll bars e frecce, cut and paste, 
search and replace eccetera ma dispone 
anche di ulterioricomandi che necessitano 
di una piccola spiegazione. 

Include Legge un file da disco e lo in- 


seriscono i comandi basic in modo imme- 
diato per rilevare lo stato del sistema o per 
le operazioni di debugging. Volendo co- 
noscere, ad esempio, il valore della varia- 
bile x, si apre la suddetta finestra, si scrive 
“Print x” e quindi si preme <RETURN>. 
Il valore di x comparirà di seguito. Volete 
una lista dei file presenti sul dischetto? 
Aprite la finestra Command, scrivete 
" Files” e quindi date <RETURN>. Il True- 
BASIC immediatamente vi mostrerà i file 
della directory corrente. Qualsiasi coman- 
do del TrueBASIC può venir digitato nella 
finestra Command. 

La finestra Output è quella dove appare 
l'uscita del vostro programma. Normal- 
mente questa finestra è chiusa finché non 
si esegue un programma in TrueBASIC. 
Allora essa viene aperta ed il risultato del 
programma, testo e grafica, appare sullo 
schermo. La finestra può venir aperta an- 
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che manualmente e mantenuta aperta 
mentre si edita un programma nella fine 
stra Source 

| programmi in TrueBASIC possono ge 
stire fino a dieci finestre aperte contempo 
raneamente sullo schermo. Queste finestre 
possono contenere testo o grafica od en 
trambi. Solo una finestra alla volta risulta 
attiva ma è Il programma che decide in 
quale finestra lavorare e in che momento 





Programmare in TrueBASIC 

Se siete abituati a programmare in A 
migaBASIC o MicrosoftBASIC rimarrete 
sorpresi dalla facilità d'uso del TrueBASIC 
Usando questo linguaggio il programma 
SpaceZap è stato scritto in un pomeriggio 
Il programma gestisce suoni, grafica e im 
put da mouse in meno di 100 linee! Que- 
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sto programma può girare su qualsias 
computer con il TrueBASIC mentre la ver 
sione con l’AmigaBASIC può funzionare 
solamente con l’Amiga. Per scrivere un 
programma equivalente in AmigaBASIC s 
sarebbe dovuto usare lo Sprite editor per 
creare uno sprite ed il numero delle linee 
sarebbe stato notevolmente maggiore 

Il TrueBASIC possiede molti comand 
tradizionali del Basic ma ne comprende 
anche molti di inediti quali 

Il comando MAT, prefissato ad un co 
mando BASIC, permette di manipolare i 
dati di un array senza creare un loop 

MAT READ - Opera come il tradizionale 
comando READ conla differenza che esso 
legge tutti gli elementi di un comando DA 
TA e li pone in un array finché l'array stesso 
non è completo, e tutto questo senza ri 
correre ad un ciclo FOR/NEXT. Ad esem- 
pio 


| Legge i mesi ed i giorni 
! della settimana 


I 


dim mesi$(12), giorni$(7) 
mat read mesi$, giorni$ 


data gennaio,febbraio,marzo, aprile,... 
data lunedi, martedi, mercoledì ... 
end 


MAT PRINT visualizza tutti gli elementi 
di un array. Esempio 


! Stampa una piccola lista 
I 


dim a(10) 
fori= 1t010 ! carica l'array 

let a(i)=i ! con questo loop 
next i 
mat print a | stampa l'intero array 
end 
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PICTURE è il comando che permette di 
definire una figura grafica e richiamarla 
come una subroutine. Picture può avere 
anche dei parametri in modo da rendere 
possibile delle variazioni ogni volta che il 
comamdo viene usato. Esempio: 


! Figura di un poligono 
! 


picture poligonoliati) 
fori=0to lati ! determina 
let u=2*Pi*(i/lati) ! i vertici 
plot Cos(u),Sin(u); ! e traccia 


next i li lati 

plot 
end picture 
set window-1,1,-1,1 ! def. area disegno 
forn=3t010 poligoni da 3-10lati 

draw poligono(n) ! disegna poligono 

next n 
end 


TRANSFORMS è un comando per mo- 
dificare completamente una figura prima 
di disegnarla. Il TrueBASIC prevede ben 


cinque funzioni per trasformare un 

disegno: 

Shift(a,b) - muove la figura. Ogni punto 
(x,y) viene spostato al punto 
(x+a,y+b); 

Scale(a) - varia la scala del disegno. 


Ogni punto (x,y) si ritrova in 
(x*a,y"a); 
Scale(a,b) - come Scale(a) con la diffe- 


1 SpaceZap ' 
1 Implementazione in TrueBasic ! 
1 di Amiga mogazine ! 
1 Marzo 1988 ' 
! ' 

' 

. 


1 
INPUT prompt “Livello di abilit 
shil11=shi11/5 
back "black" 
window -5S00,$00,-5S00,500 
0x=100 
0y*100 
0-9 
LET shots=1 


! disegna la nave 
' 


PLOT area:0x,0y+*3*%a;0x+2%4,0y-2*a;0x,0y7;0x-2*a,0y-?2*a;0x,0y+3*a 
BOX KEEP ox-3%a,0x+3%a,0y*3*a,0y-3*a in ship$ 

! la forma della nave e posta in 
? una variabile stringe 


CLEAR 

co 
LET ta=0 
BOXx SHOW ship$ at ox,0y 
BOX CLEAR ox,0x*6*a,0y*?*%a,0y 
GET MOUSE: x,y,state 
IF abs(ox+3*9)-10<0 then LET txetx*1 
IF absloy+3%a)-10<0 then LET tu-tx+1 
IF state>0 then LET txetx*1 


IF state>0 then 
FOR ss=1 to 3 
SOUND 100,.03 
SOUND 500, .03 
NEXT ss 
END IF 
IF tx=3 then 


LET hieki+1 

LET ex=rnd*S0 

SET color “red” 

FOR 1-1 to ex 
IF 1>(ex/2) then SET color “yellow” 


* (0-S) “:ehî11 


sfondo al nero 

dimensione schermo 

posizione x iniziale della nave 
posizione y iniziale della nave 


1 disegna nove 
! cancella nave 
1 senti mouse per movimento nave 


? plot «x e y 

1 pulsante di sparo premuto? 
? conteggio colpi 

1 e suono dello spero 


colpito ? 


renza che il punto disegnato in 
(x,y) va a finire in (x*a,y"b); 


Rotate(a) - ruota la figura di (a) radianti 
(o gradi) in senso orario attorno 
alle coordinate di origine della 
finestra; 

Shear(a) - inclina tutte le linee verticali 


del disegno in senso orario di 
(a) radianti o gradi. Il punto che 
si trova in (x,y) viene spostato 
alla locazione (x+y*tan(a),y). 
La trasformazione può venir applicata 
anche agli array consentendo una facile 
manipolazione degli stessi. 


ON-LINE HELP 


Il TrueBASIC dispone di ulteriori facili- 
tazioni nell'uso dell’help. Per richiamarlo 
basta digitare 'Help<CR>' nella finestra 
Command o premere il tasto help. Com- 
parirà una richiesta; selezionare l’item per 
il quale servono le informazioni con un 
doppio click (o digitare le prime lettere del 
comando); si aprirà una finestra con il mes- 
saggio di help richiesto. 

PLOT. Qualsiasi punto dello schermo 
può essere indirizzato usando il comando 


Plot x,y° 
Volendo indirizzare piu' punti si userà 
"Plot points: x1,y1;x2,y2;...” 


Per disegnare linee tra i punti basta ag- 
giungere il carattere ”;” dopo le coordi. 
nate di ogni singolo punto 


Plot x1,y1;x2,y2;...' 


Per riempire un’area delimitata da punti 
usare il comando 


Plot Area:x1,y1;x2,y2;...' 


Il colore usato sara' quello corrente. Il 
comando Plot combinato con il comando 
Window consente di realizzare dei grafici 
molto velocemente e senza sforzo. Per la 
rappresentazione del grafico è necessario 
fornire innanzi tutto i valori di riferimento 
per gli assi cartesiani. Ad esempio, volen- 
do disegnare un grafico che rappresenta 
il numero di automobili costruite in Italia, 
ogni cinque anni, negli ultimi trent'anni, si 
deve definire una finestra con il margine 
sinistro al valore 1958 ed il margine de- 
stro al valore 1988; il margine superiore 
potrà essere di 10 milioni mentre il mar- 
gine inferiore sarà pari a 0. Una volta de- 
finita la finestra in questo modo si userà il 
comando plot, per l'inserimento dei punti 
significativi o il tracciamento delle linee, 
inserendo i valori delle coordinate x e y 
direttamente in anni e in milioni di auto- 
mobili e non in pixel come normalmente 
siamo abituati a fare. 

Il linguaggio TrueBASIC permette di far 
uso anche delle librerie. Questo significa 


PLOT 0,0;rnd*100, rnd*100 

PLOT 0,0;-rnd*100,-rnd*100 
PLOT 0,0;-rnd*100,rnd*100 
PLOT 0,0;rnd*100,-rnd*100 


NEXT i 
CLEAR 
1 livello di abilità 


END IF 


IF xt<>x then LET maexox1 
IF y1<>y then let my*y*yì 


LET ox-ox-mx/50 
LET oy-oy-my/50 
IF stote>! then 


GET MOUSE:N1,n2,nu1l 
SET color “red* 
LET shots=shots+1! 


END IF 
PLOT 0,0 
PLOT $0,0;100,0 


PLOT 0,80;0,100 


PLOT 0,-$0;0,-100 
IF stote>? then SET color “white” 


IF Kki>4 then 


LET his 
END IF 
LET x1=x 
LET yt=y 


LET ox-ox*(shi11*(rnd*38)) 
LET oy-oy*(shkil1®(rnd*3S)) 
' LET ox*ox*(shi11*(-rnd*38)) 
LET score=-score+? ? se si, incrementa score LET oy-oy*(skil1®(-rnd*35)) 
t 
' 


PLOT -50,0;-100,0 


LET shill=shi]l1+.2 


SET color "white" 
PRINT “Shots*;shots 
PRINT “Kilils";score 
PRINT “Shill";shill®6 
LET ox=(rnd*1000) -S00 pos. x per nuova nave 
LET oy*(rn4*1000) -500 pos. y per nuova nave 


stampa colpi 
stampa punteggio 
stampo livello 


nave mancata, calcola 
neve mancata, calcola 


reset pulsante di sparo 
cambia colore puntatore 
aumenta di uno i colpi 


! disegna puntatore nel colore corrente 
? bianco se non sparo 
? rosso se spero 


! Sparo? cambia colore 
1 se piu di 4 colpiti al livello scelto 
? incrementa skill level di 1 


! pilot manovra evasiva nave 

? in base al livello di abilita 
? piu alto il livello 
? piu si muove la nave 


e incrementa contatore skill IF 0y>490 then LET 0y=490 
disegna esplosione IF 0y<-490 then LET o0y=-490 


IF 0x>490 then LET ox*490 
IF 0x<-490 then LET ox=-490 


Loop 
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che se, ad esempio, avete una routine che 
usate frequentemente nei vostri program- 
mi, potete sistemarla in una libreria e poi 
chiamarla da programma. (Queste librerie 
non hanno niente a che vedefe con le li- 
brerie dell’Amiga, esse sono proprie del 
TrueBASIC). Verso e da le librerie possono 
essere passati valori e variabili; questo 
semplifica moltissimo la programmazione. 
Si possono scrivere e correggere diversi 
moduli indipendentemente uno dall'altro e 
quindi linkarli con un altro programma per 
produrre un programma completo. 


Il package 


Non rimarrete certo delusi nell'aprire la 
confezione del TrueBASIC. Troverete in- 
fatti: due dischetti, contenenti uno il pro- 
gramma principale e l'altro numerosi e- 
sempi di programmi, e due manuali: the 
User's Guide e the Reference Manual. En- 
trambi i manuali sono rilegati con spirale 
e pubblicati da Addison Wesley: lo stesso 
editore degli eccellenti Amiga reference 
manuals. 

L’User's Guide è rivolto ai neofiti del 
Basic; il manuale infatti è una guida rapida 
per chi deve imparare a programmare con 
questo linguaggio; ogni comando è spie- 
gato chiaramente ed è fornito di numerosi 
esempi. 

Il Reference manual è invece rivolto ai 


Orbits ' 
Implementazione in TrueBasic 1 
di Amigo Magazine ' 
Aprile 19858 t 
' 
' 


' 1 
SET mode "hight6" 
SET window -500,600,-500,800 


1 origine al centro dello schermo e 
! schermo di larghezza ed altezza di 


SET color "blue" 
SET back “black” 
DO while t<2 or t>10 


1 1000 punti 


INPUT t 
Loop 
' 


! definizione array 

' 

DIM G[10),X( 10), Y{ 10) ,U(10),V( 10), A{ 10) 
' 

! volori per tutti gli oggetti 

' 


FOR i-1 to t 
PRINT “Per oggetto orbitante n. “;i 
PRINT "Gravita="; 
INPUT G( 1) 
let RA(1)=6(1)/5 

PRINT “Coordinate x-"; 
INPUT x( i) 
PRINT "Coordinate Y="; 
INPUT Y(1) 
PRINT “xX-velocita="; 
INPUT U( 4) 
LET U(1)=(U(1))/100 
PRINT “"Y-velocita="; 
INPUT V( 4) 

LET V(i)=tVv(1))/100 

NEXT 1 


AMIGA magazine 


1 grafica in alta risoluzione 


? numero degli oggetti 
PRINT "Numero degli oggetti orbitanti (massimo 10)"; 


valore grovita 


! coordinata X iniziale 
! coordinata Y iniziale 


! valore velocita X 


! valore velocita Y 








programmatori già esperti che vi troveran- 
no specifiche informazioni su ogni coman- 
do del TrueBASIC. Ogni capitolo del libro 
descrive nel dettaglio un diverso aspetto 
del linguaggio, dalla grafica al trattamento 
degli errori, ed è corredato di numerosi 
esempi. Nel manuale sono trattati concetti 
avanzati come l'assemblaggio di routine, 
la manipolazione grafica, il trattamento dei 
file e la compatibilità con i vari dialetti Ba- 
sic. 

In conclusione il TrueBASIC è veramen- 
te un programma accurato, di uso imme- 
diato ed esente da errori. Un semplice test 
consistente nel conteggio da uno ad un 
milione ha evidenziato una velocità almeno 
due volte superiore a quella dell'Amiga- 
Basic. 

Per il TrueBASIC sono disponibili un cer- 
to numero di librerie esterne di programmi. 
Tra queste ricordiamo 3D graphics, PC 
BASIC converter per tradurre da altri dia- 
letti Basic, Communications Support, Sor- 
ting and Searching, Advanced String Li- 
brary e diverse altre. L'Amiga Developers 
Toolkit comprende routine per grafica a- 
vanzata e gestione di suoni, routine per 
animazioni avanzate e accesso a tutte le 
funzioni di sistema. 

All'articolo sono acclusi due semplici 
programmi per illustrare la semplicità d'u- 
so e le possibilità offerte dal linguaggio. 


CLEAR 
' 


t 
Do 
FOR 1-1 to t 


LET 
LET 
LET 
LET 
LET 
LET 

IF 


or 
or 


IF io? 


NEXT £ 
? CLEAR 
Loop 
ENO 


SpaceZap 


SpaceZap è stato scritto per valutare se 
il TrueBASIC supporta un buon livello di 
routine grafiche; con esso infatti non è pos- 
sibile gestire gli sprite. È risultato comun- 
que che il TrueBASIC dispone di una buo- 
na qualità grafica ed usando il comando 
Plot Area in unione con la funzione Picture 
è possibile simulare gli sprites come è stato 
fatto in questo programma. 


Orbits 


Orbits è un piccolo programma che era 
stato scritto originariamente per un com- 
puter Atari. Esso dimostra come sia facile 
convertire al TrueBASIC, programmi scritti 
in altri dialetti Basic e per altri computer. 

Orbits permette di definire la gravità e 
la posizione di un massimo di dieci oggetti; 
il programma poi calcola e visualizza ogni 
oggetto in relazione a tutti gli altri. 

Il programma è stato convertito abba- 
stanza facilmente. Tutte le formule mate- 
matiche sono state trasferite intatte. Le u- 
niche variazioni riguardano le dimensioni 
dello schermo e l'indirizzamento dello stes- 
so con i comandi Window e Plot. Questi 
ultimi sono stati adattati per sfruttare il van- 
taggio di una maggiore risoluzione e di un 
numero più elevato di colori disponibili. 


! calcola e definisci i punti 


FOR j=1 tot 
IF 10>3 then 


XIX 3) <X( 1) 

Yer g)-Y( 1) 
O2=x1#X1eY1®Y1 

Gt=G( 3) /(02*sqr(02)) 
U( i) =U( 1) +*G19x1 

V( 5) =v( 4) eG1ovi 


1-9 then SET color “blue” 
i-10 then SET color "white" 


then SET color "red" 
then SET color “yellow” 
then SET color "green" 


IF i-6 then SET color “cyan” 


then SET color "magenta" 
IF i-8 then SET color “brown” 
box circle x(i1)-(R(1)/2),X(1)*(A(1)/2),Y(1)- 
(A(1)/2),Y(4)*(AC(1)/2) 
IPLOT xs) ,Y(5); 
LET Y(i)=Y(1)*v(1) 
LET X(i)=X(1)*U(1) 
box circle X(41)-(A(1)/2),X(£)*(A(1)/2),Y(1)- 
(AC1)/2) ,Y{i1)*(A(1)/2) 
PLOT x(4),Y(4) 


? plot prima posizione 


! plot seconda posizione 


! rimuovere “!?" per cancellare le tracce 





I SITA | COME PROGRAMMARE [_15.000 | 
Ser] PROGRAMMAZIONE STRUTTURATA, 

CORSO DI AUTOISTRUZIONE 
9s] TERMINI DELL'INFORMATICA E DELLE 

DISCIPLINE CONNESSE 50.000 


LOGICA E DIAGRAMMI A BLOCCHI: 
TECNICHE DI PROGRAMMAZIONE 


6YS190 
6YS248 
28 


INFORMATICA DI BASE | CONCETTI 
FONDAMENTALI HARDWARE E SOFTWA 


Gy 551 6 
LA PROGRAMMAZIONE 

6vsss ] 
ovss4 
Gv 618 i 
0477 


CAPIRE IL PERSONAL COMPUTER 


MODELLI MATEMATICI E SIMULAZIONE , 


ENCICLOPEDIA MONOGRAFICA DI 
ELETTR. E INF. VOLUME | i 
GE 689 | ENCICLOPEDIA MONOGRAFICA DI 

ELETTR. E INF. VOLUME Il 


GY 629 | SOFTWARE DI BASE - Strumenti di sviluppo 


INFORMATICA: 
SISTEMI OPERATIVI 
SISTEMI OPERATIVI PER MICROCOMPUTERI 
=] 
avszri 


SOFTWARE DI BASE E SISTEMI OPERATIVI 
CP/M IL “SOFTWARE BUS" 
DOS E PC-DOS LO STANDARD IBM 


MS- 
02 E | COFANETTO “MS-DOS” 5°% - 
Corso autoistruzione 


MS DOS ADVANCED - 
Il Manuale del Programmatore 


3 | UND PHOGRAMMAZIONE AVANZATA | 55 
| GUIDA ai sistEMI OPERATMI | 29. 
LINGUAGGI 
[IMPARIAMO IL PASCAL__________|16 


PASCAL MANUALE E STANDARD DEL 
LINGUAGGIO ù 


1 
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$ ®|d 
Gignnne 


8 


n 
iii i 
» 
SEP greizsa[ ser “FERIE 


Hole 
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8 
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GY 272 


S|a|s|è ò  |e js ® |2|s 
goes ili iggigane 


3|5 
3|3 


R628 
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Yo 


8 
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3|8 


w 
© 





TUO PRIMO PROGRAMMA IN BASIC (II) 
BASIC DALLA A ALLA Z 

LINGUAGGIO ADA 

LINGUAGGIO C 


STRUTTURATO: CORSO DI 
AUTOIS 


PROGRAMMARE INC 

COBOL PER MICROCOMPUTER 
ESERCIZI DI FORTRAN 

ESERCIZI IN PASCAL: ANALISI DEI 


GYS254 
Gy 270 


PROGRAMMAZIONE IN LINGUAGGIO ADA 
APL PER IL P.C. IBM 

DAL PASCAL AL MODULA 2 
LINGUAGGIO C IL LIBRO DELLE SOLUZI 
APPLICAZIONI IN PASCAL 

TURBO PASCAL 

"C* LIBRARY 49 
PROLOG - LINGUAGGIO E APPLICAZIONE 
TURBOPASCAL - LIBRERIA DI PROGRAMMI 


GYS311 






8|8 





FORTH ANATOMIA DI UN LINGUAGGIO 


FORTRAN E COBOL LINGUAGGI SEMPRE 
VERDI 


6 D ED È SUBITO BASIC VOL. 1 


3 
8 






s 







[0870 |Eoesusmosasicvo.2 | 7oo0] 
[osat_|PROL06 | 14000] 
[osst_|use_________|12500] 
loorH_|cosw__________]| 8500] 
[006H_|Pascaa_____________| 8500) 
[oorH_|sase | 8500) 
[10H_|FORTRAN77 | 8500) 
[o204_|uoso_______| 8500) 
[0224 _|FORIH_______| 8500] 
|R612_|uasoproLo6_________| 50000] 
| GY 626 | IL MANUALE DEL PASCAL | 42000] 
| GY616 | DEBUGGINGC | 55000] 
e I PI 
AL PASCAL 
Gy 634 40.000 


INFORMATICA: 
LAVORO È SOCIETÀ 
COMPUTER GRAFICA 
ODISSEA INFORMATICA 


APPLICAZIONI DEL COMPUTER 
NELL'UFFICIO MODERNO 


Il SER] 33 
Si| +|“/S] 8/2 


8/3 
8 [8 


O =|R 
A 
R 


407 KH 






INFORMATICA MUSICALE I 27.000 | 
40.000 
COMPUTER PER L'INGEGNERIA EDILE | 22.000 | 


COMPUTER PER IL MEDICO 19.000 






2 v v 


COMPUTER IMAGE 40.000 

ODISSEA INFORMATICA STRATEGIE lazio 

CULTURALI PER UNA SOCIETÀ INF. 

COMPUTER GRAPHICS E ARCHITETTURA | 27.000 | 

COMPUTER GRAPHICS E MEDICINA 
GY 487 | MEDICO & COMPUTER | 45.000 | 





© 
< 
£ 
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INFORMATICA MEDICA 
OFFICE AUTOMATION 28.000 
DESKTOP PUBLISHING 


$ 
: 
5 


° 
4 


INFORMATICA: 
SOFTWARE PACCHETTI APPLICATIVI 
CONTABILITÀ COL PERSONAL COMPUTER 

WORDSTAR 
MANUALE DEL DBASE Il 


PC NELL'ORG. DELLE PICCOLE AZIENDE: 
APPL. DEL MULTIPLAN 


LOTUS 1-2-3: GUIDA ITALIANA ALL'USO 


RIORDINO E GESTIONE DEGLI ARCHIVI 
APPLICAZIONI CON PFS-FILE 


DBASE ill GUIDA ITALIANA ALL'USO 
MODELLI DECISIONALI PER IL MANAGER 


PIANIFICAZIONE AZIENDALE PLANNING, 
MARKETING STRAT., BUDGETING 


LA GRANDE GUIDA LOTUS A SYMPHON' 
MULTIPLAN CORSO D'ISTRUZIONE 
RAMEWORK Il - GUIDA ITALIANA ALL' 


n 
n 
w 
» 


3|$ 
/S 
© |a 
z 
5 
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li 
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(rase | IMPARA 1-2-3 CON LA GRANDE GUIDA 


LOTUS 


|PP 468 | CHART-CORSOISTRUZIONE | 45000|F 
GITE IA 

VERSIONE ITALIANA 2 LOTUS 1-2-3 29.000 
40.000 
|PP 475 | DBASE ill - CORSO DI PROGRAMMAZIONE |_23.000 | 


PA 476 


F 


8 
$ 


GUIDA ALLA BUSINESS GRAPHIC 


3|5 


E 5000 - GUIDA ITALIANA ALL'USO 


È : 
| 


cin 
$ $|8|8]8_|3|8 


3 


SE Hi - TECNICHE AVANZATE DI 
RAMMAZIONE 


ICAZIONI DI DBASE Ill 
ELLI DECISIONALI CON LOTUS 1-2-3 
INUALE DBASE Il PLUS 


i 


1 COMANDI DI DBASE Ill PLUS 


GUIDA Al PACKAGE APPLICATIVI 
MERCEOLOGIA DEL SOFTWARE 


VISICALC GUIDA RAPIDA ALL'UTILIZZO 


PP 621 


olo v 
8 £/2/8/3|? 2 


$ HE 
i x 
5 


° 

È 

o 
“vw 
8 


LOTUS 1-2-3 E SIMPHONY IL FASCINO 


o 
m 
2 
£ 
z 
_ 
m 
o 
È 
m 


DBASE Il E Ill | PRINCIPI DI DATABASE 
MULTIPLAN SPREADSHEET MULTISTRATI 
PACKAGE A CONFRONTO PROVE DEI 


106 D 


LAMEWORK E FRAMEWORK Il 






027 H SY SCRIPT 
|ECT 
BASE 
GUIDA ALL'USO PROFESSIONALE 


23 Ss 5 3 
sii; 
s |s ® s x 
RE BGGGGSGNS ab 


IANUALE DI WORD 


GUIDA ALL'USO PROFESSIONALE 
DI LOTUS 1-2-3 


VENTURA - Il grande manuale 
LINGUAGGIO C - Reference guide 


I COMANDI DI LOTUS 1-2-3 - 
Reference guide 


PROGRAMMARE IN FRED 

GBASE Ill PLUS - Guida uso professionale 
PROGRAMMARE IN WINDOWS 

ESTIONE DELLA PRODUZIONE 
VENTURA - REFERENCE GUIDE 
MATEMATICA CON LOTUS 1-2-3 
MANUALE DELLE STAMPANTI LASER 
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PROGRAMMI PRATICI IN BASIC 


BASIC E LA GESTIONE DEI FILE VOL. |: 
METODI PRATICI 


75 PROGRAMMI IN BASIC PER IL VOSTRO 
COMPUTER 


PROGRAMMI DI MATEMATICA E 
STATISTICA IN BASIC 


PROGRAMMI SCIENTIFICI IN PASCAL 
BASIC E LA GESTIONE DEI FILE - VOL. 2 


COMPUTER HARDWARE REALIZZ. 
PRATICHE PER GLI HC PIU DIFFUSI 


COMPUTER L'HOBBY E IL LAVORO 
GRAFICA PER PERSONAL COMPUTER 
METODI DI INTERFACC. PERIFERICHE 


CORSO DI AUTOISTRUZIONE PER 
MICROCOMPUTER VOL. 1 + VOL. 2 


COME GESTIRE LA PICCOLA AZIENDA 


è 


PIHRSÌ 






PA 406 


PP 408 






IL COMPUTER E UNA COSA SEMPLICE 
CONTROLLO DEI DISPOSITIVI DOMESTICI 


PERSONAL COMPUTER DAL SOFTWARE DI 
BASE ALLE APPLICAZIONI D'UFFICIO 


HARD DISK - LA GRANDE GUIDA 
INTRODUZIONE Al PERSONAL COMPUTER 


3 


| 






SCRIVERE UN'AVVENTURA, 
1000 AVVENTURE COL PROPRIO PC 


GRAFICA E BASIC LE BASI DELLA 
COMPUTERGRAFICA 


[F[EUEFLILE 
; 
/ 
dl i dd 6 FRG i RAG 





HARDWARE DI UN PERSONAL COMPUTER 
DENTRO E FUORI LA SCATOLA 


GESTIONE DEI FILE IN BASIC E PASCAL 
VOL. 1 
GESTIONE DEI FILE IN BASIC E PASCAL 
VOL. 2 


DISEGNARE COL PERSONAL COMPUTER 


PERSONAL E HOME COMPUTER A 
CONFRONTO 





SUONO È MUSICA COL PERSONAL 
COMPUTER x 


COSTRUIRSI UN PERSONAL DATABASE 


GUIDA ALL'ACQUISTO DI UN PERSONAL 
COMPUTER 
088D TO DO OR NOT TO DO COME AVER CURA 
DEL PROPRIO PC 
089 D SOFTWARE STRUTTURATO CON ELEMENTI 
DI PASCAL 


STENDERE UN PROG. COME SI DEVE 
i 
PERSONAL COMPUTER: 






È 


2 
o 


E IL VOSTRO COMMODORE 64 
IMODORE 64 - IL BASIC 


i 


64 - LA GRAFICA E IL SUONG 
TECNICHE DI PROGRAMMAZIONE 
SUL COMMODORE 64 

64 

e: 





sie 
3 
» 


Ju 


il Feipsi iS 


ttt 


575D 





SISTEMA TOTOMAC: LA NUOVA FRONTIE 
DEL TOTOCALCI 
64 PERSONAL COMPUTER E C64 


STATISTICA AD UNA DIMENSIONE CON 
IL C64 


i 
|CC:320 | AMIGAHANOB00K | 35000| 
|CC 322 | COMMODORE 128 OLTRE IL MANUALE | 29.000 | 
|CC:323 | PROGRAMMI PER COMMODORE 128 | 29.000 |c 
|CZ541 | 128E64-LE PERIFERICHE | 32000] 
| CC 564 | MANUALE RIPARAZIONE C64 | 55.000] 
|CZ532 | MANUALE DIAMIGA | 39000 
[002H_|CcommovorE64________| 8500] 


Giai GRAFICA E SUONO PER C64 - 64PC - lines 
C128 
MANUALE DEL COMMODORE 

C64 - C64PC - C128 


[cc.627 | amiasoo_ _______________| 55000] 
[CC 750 | C.128LAGRANDE GUIDA | 50.000| 


C.64 LA GRANDE GUIDA 






SDP222 


sl fF|#[#[#F 
B 
se 



















$ 
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PROGRAMMI UTILI PER IBM PC 


6217 DATA PER IL PERSONAL COMPUTER 


PC IBM MANUALE DEL LINGUAGGIO 
MACCHII 


GY 335 Mo IBM GESTIONE DELLA 





MANUALE BASE DEL PC IBM 


R 609 SOLUZIONI AVANZATE PER IL 


HE 


\VVENTURE PER MS-DOS 


| 


è 3|s[slafa s $ |a 8 
sil Gbit) siii È 


PRIMO LIBRO PER M24: MS DOS E GW 


OLIVETTI M10: GUIDA ALL'USO 
BASIC IN 30 ORE PER M24 ED M20 


MANUALE PC 128 OLIVETTI PRODEST 


PROGR. PER PC 128 OLIVETTI PRODEST 
(CASS.) 


ò 


i 


30 PROGRAMMI PER MSX 
MSX: IL BASIC 

[cc 261 | avventuRE Ms» ____________| 20000/c 
CC 289 | SUPER PROGRAMMI PER MSX | 35.000|c 
[cc 336 | MsxLaGRAFICA | 25000 
[1110 |sranparomsx___________{ 7000) 














isf | 


APPLE Ii GUIDA ALL'USO 
MACINTOSH NEGLI AFFARI: 






UN MAC PER AMICO: USO, APPLICAZIONI 
E PROGRAMMI PER MACINTOSH 


MACINTOSH ARTISTA: MACPAINT E 
i 


E ESE È 
it 
di 


APPLE IIC GUIDA ALL'USO 45.000 
PROGRAMMI PER APPLE IIC | 13.000 | 
PROGRAMMI COMM. E FINANZIARI CON 
APPLE 

76 | IL MANUALE DELL'APPLE ll GS 
MICROSOFT BASIC PER APPLE 
MACINTOSH 


COMPUTER: 
ATARI - AMSTRAD - SHARP 


: 






[540H_|Basicarari | 18000] 
but 
CPC 664 - CPC 6128 29.000 
[CC 331 | PROGRAMMI PER ATARI 130XE | 19.000 
[CC 471 | MANUALE ATARI 520 STE 1040 ST | 28.000 | 
fai 
PCW 8256/8512 
[0821 | AMSTRAD PCW 8256 e POW 8512 | 14.000| 
[028H_ |AMSTRAD464E664___________| 8500] 
|__—|COMMUNICATION E TELEMATICA |__| 






Prere | PRINCIPI E TECNICHE DI ELABORAZIONE Lasa 
DATI 20.000 


[180 |revemarica | 28000] 
[s28p_|tRAsMissione DAI____________| 27000] 


RETI DATI: CARATTERISTICHE, PROGETTO 
E SERVIZI TELEMATICI 


ELABORAZIONE DIGITALE DEI SEGNALI 
TEORIA E PRATICA 


BANCHE DATI RICERCA ONLINE 


COMUNICAZIONI DALLE ONDE 
ELETTROMAGNETICHE ALLA TELEMATICA 


MODEM E PC USO E APPLICAZIONI 
RETI LOCALI 

IL MODEM - TEORIA, FUNZIONAMENTO 
TRASMISSIONE DATI PER PC 

LA TELEMATICA NELL'UFFICIO 


COLLEGAMENTO TRA MICRO E 
MAINFRAME 


MANUALE DI TV E VIDEO COMMUNICATION] _4 
ELETTRONICA DI BASE 
E TECNOLOGIA 


CORSO DI ELETTRONICA FONDAMENTALE 
CON ESPERIMENTI 


LETTRONICA INTEGRATA DIGITALE 


MANUALE PRATICO DI PROGETTAZIONE 
ELETTRONICA 


SISTEMI DIGITALI: MANUTENZIONE, 
RICERCA ED ELIMINAZIONE GUASTI 


TECNOLOGIE VLSI 


ELETTRONICA INTEGRATA DIGITALE 
IL LIBRO DELLE SOLUZIONI 


LA FISICA DEI SEMICONDUTTORI 


ELETTRONICA DI BASE | FONDAMENTI 
DELL'ELETTRONICA ANALOGICA 


ELETTRONICA DIGITALE VOL. 1 DALLE 
PORTE LOGICHE Al CIRCUITI INTEGRATI 


ELETTRONICA DIGITALE VOL. 2 
DAI BUS Al GATE ARRAY 


ELETTROTECNICA ELETTROSTATICA 
EL IETISMO RETI ELETTR 





s |alela sla ls 
pih 


6TS478 
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GES390 
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APPLICATA 







[sore _|mmersss_ | 10000] 
I 
DIGITALI 10.000 
|612P__| MANUALEDEGLISCA vo. 1 | 28000] 
|613P__| MANUALE DI OPTOELETTRONICA | 15.000 | 
|614A_|FieReoricHtE | 15000] 
| GE 403 | JFETMOSEDATAB00OK | 20.000| 
| GE 404 | TRANSISTOR DATA BOOK __________]| 32000| 
METODI DI PROTEZIONE CONTRO LE i 
[GE 408 | SSTRRTENGIONI CONE CONTRO LE 
| CE 413 | IL MANUALE DEGLI SCR E TRIAC | 15.000 | 
[ CE 421 | MANUALE DEI FILTRI ATTIVI________| 29.000] 
belt MANUALE DEI PLL PROGETTAZIONE PPS 
DEI CIRCUITI 29.000 
MANUALE DEGLI AMPLIFICATORI 
[0E495 | HARMBORAG AMPURGATOR | g0o0o| 
[08458 | 250 PROGETTI CON GLI AMPLIFICATORI 
DI NORTON 39.000 
[CE 431 | manuaLe pelcMos  __________] 25.000] 
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EZO 










[copice | molo 
| CE 485 | IL COLLAUDO DELLE SCHEDE 
[BE 557 | I TRASDUTTORI [_43.000 | 
| BT 585 | FIBRE OTTICHE 
BE 578 | MANUALE DI ELETTRONICA | 29.000) 
pesa: IL MANUALE DEL TECNICO 
ELETTRONICO 
BE 610 | GUIDA ALLA STRUMENTAZIONE FA 
ELETTRONICA 
BE 619 | MULTIMETRI DIGITALI | 42.000 | 
ENCICLOPEDIA DEI CIRCUITI INTEGRATI | 60.000 
MANUALE DI ELETTRONICA 
DEL COMPUTER 20.000 
MANUALE PRATICO DEL RIPARATORE 
OP | RADO 
| 7O5P__| IMPIEGO PRATICO DELL'OSCILLOSCOPIO | 17.500 | 
[ner | PROGETTAZIONE DI SISTEMI DI 
ALTOPARLANTI 
| CE 427 | L'ELETTRONICA A STATO SOLIDO | 25.000 | 
| BE 718_| 77 SCHEDE PER IL RIPARATORE TV 
BE 723 _| MISURE DEI CIRCUITI ELETTRONICI 26.000 









TECNICHE DI INTERFACCIAMENTO 
MICROPROCESSORI 


IANOBOOK Z80 VOL. Ill 
MICROPROCESSORI DAI CHIPS AI SISTE! 
PROGRAMMAZIONE DELLO Z80 E 


s 


di ii db 


#|83|2 
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\310P_| 
Ber 
[312P_| 
[320P_| 
Ai. PROGETTAZIONE LOGICA 
[ras | 280 PROGRAMMAZIONE IN LINGUAGGIO 
ASSEMBLY 
|328D |PROGRAMMAZIONE DELLO Z80 | 40.000 
| 5048 | APPLICAZIONI DEL 6502 | 17000] 
| 5038 | PROGRAMMAZIONE DEL 6502 | 35.000] 
[s0s8_|Giocticonneso__________| 19500] 
| 6220 | 8086-8088 PROGRAMMAZIONE | 40.000 
|GY 265 | ASSEMBLER PER IL 68000 _________| 70.000] 
|cE 410 | impiego DELLO 280 | 23.000) 
“si 
INTERFAC. DEI MP DA 4 A 32 BIT 
|o13H |AssemseR6S02______________| 8500) 
lo16H | AsseMseRz8o_ | 8500] 
|021H |AasseMBLER68000 | 8500) 
|025H |ASSEMBLER8086-8088 | 8500] 
|029H |AssEMBLER 80286 | 8500] 
pri 80286 ARCHITETTURA E Cai 
PROGRAMMAZIONE 
enni 80386 ARCHITETTURA E can 
PROGRAMMAZIONE 37.000 





CONTROLLORI PROGRAMMABILI 
CONTROLLO AUTOMATICO DEI SISTEMI 


STRUTTURA E FUNZIONAMENTO DEI 
CONTROLLI NUMERICI 





6I16P 


SeGnna i dh 


PROGRAMMAZIONE E APPLICAZIONI 
30 APPLICAZIONI DI CAD 

CAD/CAM & ROBOTICA 

DAL CHIP ALLA ROBOTICA 

LA PROGETTAZIONE AUTOMATICA 
ROBOTICA - Fondamenti e applicazioni 


DIZIONARI ENCICLOPEDICI 


399 





po o 
ReFFAliL EFP 
E 
ì 
a 





dr 
$|8 


GEOLOGIA 

[Ds 524 | eLETTRONICA | 14000] 
|0s 525 | astronomia ______________| 14000] 
[ps 526 | cHimica | 14000 
|DS 527 | RAGIONERIA GENERALE | 14000) 
|DS.528 | RAGIONERIA APPLICATA | 14000 
[Ds 520 | sioosia_________________| 14000 
[os 530 | Meccanica _______________| 14000 
[DS 591 | incormatca | 14000 
ARGOMENTI VARI 


|7040__| MANUALE PRATICO DI REGISTRAZIONE _|_10.000 | 
|706A__| COMUNICAZIONI RADIO INMARE | 18.000] 


FENDER. STORIA DI UN MITO 28. 


SOFTWARE E MANAGEMENT TOOLS 
GRAFIX - DISEGNARE CON IL PC . 


06 | CORSO AUTOISTRUZIONE LOTUS 1-2-3 
(VERS. ITALIANA) F - MS DOS 


TY 605 | CORSO AUTOISTRUZIONE SUL SISTEMA 
MS DOS - FLOPPY 


TY 640 | TURBO PASCAL - LIBRERIA DI PROGRAM 40.000 
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——_———____—__,_ 
| CODICE mroLo [prezzo | Î 
Mi 
| TP 643 CORSO AUTOISTRUZIONE LOTUS 1-2-3 li 
| (INGLESE) Il 90 000 | 
[TP 608 BUDGET STRATEGICO (LOTUS 1-2-3) 100.000 |F 
} — — T i 
| TP614 GESTIONE DELLE COMMESSE DI F 
PRODUZIONE 00.000 
mit _- “i 
| TP 623 CONTROLLO DELLE VE NDITE F 
L (CON MULTIPLAN) _ _|100.000 
TP 625 GESTIONE DEL PE RSONALE (LOTUS 1 2 3 ] 100 000 jF 
I i I 
TP 677 GESTIONE DELLE COMMESSE CON |F 
| MULTIPLAN 2.0 100.000 
I ee - Ì 4 
TP 673 PREVENTIVO E CONSUNTIVO DEI COSTI |F 
CON LOTUS 1-2-3 VERS. 2 
E MULTIPLAN 2,0 100.000 
i—_—_+_ —___—_—_—_- i 
TP 660 | 1-2-3 LIBRERIA DI MACRO 60.000 |F 
fase din — —t 
TY 691 SUPER SCREEN - UTILITY PERI F 
I | PROGRAMMATORI RI age |_50.000 
TY 690 | PC DOCTORUTILITY - RECOVERING DEI F 
[FILE — Sn 60.000 
TP 644 STATISTICA A UN ‘A E DUE DIMENSIONI — | 100.000 |f 
TP 681 | ANALISI ABC CON LOTUS 1-2-3 100.000 |F 
TP 669 GESTIONE DELLE COMMESSE F 
CON dBASE IM PLUS 100.000 
j 
MARKETING & MANAGEMENT 
I M 648 PROBLEMI DI MARKETING 45.000 
} poi 
M 649 DISTINTA BASE 23.000 
I n ft 
M 650 TECNICHE DI ANAL ISI 
FINANZIARIA | 52.000 
NOVITÀ SETTEMBRE ’88 | 
———— T i 
M 647 | RICERCHE DI MERCATO | 72.000 
PP 641 | AUTOCAD - ll grande manuale |_55.000 
I n È a n 
PP 728 VENTURA - Realizzazione e utilizzo F 
dei fogli stile | 42.000 
Us ae 4 | 
PP 741 WORD versione 3 e 4 59.000 |F 
R736 | INSIDE PCIBM |_63.000 | 
nl ml 
R734 I MANUALE DEL DOS 55.000 
—— DE i 
BE 721 | MANUALE PRATICO DI ELETTRONICA | 
| DIGITALE |_26.000 
BE 684 | IL MANUALE DEI cMOS ] 35.000 





F = libro con floppy 
| C=libro con cassette 


qualsiasi momento. 








DIVISIONE PUBBLICITÀ 





Per le vostre ordinazioni per corrispondenza uti- 
lizzate l'apposita cedola inserita in questa rivista. 


* L'Editore si riserva di moditicare i prezzi di copertina in 
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PROFESSIONISTI 


R. Farabone/l. Pinotti 


FONDAMENTI 
DI COMMON LISP 


Pag. 320 
Cod. GY634 


Lire 40.000 


Il testo si pone come tramite 
indispensabile per il neofita 
che possieda solo conoscenze 
teoriche sulle problematiche, 
guidandolo con gradualità e 
numerose esemplificazioni, ad 
una adeguata e corretta 
padronanza del linguaggio. 


ag 


ea 





H.L. Davidson 

MULTIMETRI DIGITALI 

pp. 308 Lire 42.000 
Cod. BE619 


Indirizzato a tutte quelle 
persone, principianti o 
professionisti, interessate alla 
individuazione dei guasti e 
alla riparazione di apparecchi 
elettronici commerciali, 
mediante l'uso dei multimetri 
digitali. 


H.W. Buchsbaum/R.J. Prestopnik 


ENCICLOPEDIA 

DEI CIRCUITI INTEGRATI 

pp. 536 Lire 60.000 
Cod. BE639 


Vengono fornite le principali 
informazioni su quasi 250 
circuiti integrati, dai più 
semplici ai microprocessori a 
32 bit. 
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CE. Panzalis 
WORD 


pp. 90 
Cod. 050T 


Lire 14.500 


Una guida per una veloce 
consultazione ed un approccio 
dinamico al word processing 
che consente di comporre, 
organizzare, impaginare e 
quindi stampare un documento 
con qualità professionale. 


Aa 


Lai DIL 


Sybil P. Parker 
ENCICLOPEDIA 
MONOGRAFICA DI 
ELETTRONICA E 





INFORMATICA 

Vol. | 

pp. 608 Lire 58.000 
Cod. GE688 

Vol. Il 

pp. 612 Lire 58.000 
Cod. GE689 


La sola enciclopedia in grado 
di fornire una panoramica 
completa ed approfondita 
dell'elettronica e 
dell'informatica, con articoli su 
argomenti di primario 
interesse ed estrema attualità. 


IL TUO LIBRO 


J0053 





LETTORI 


IL GRUPPO EDITORIALE JACKSON PROMUOVE OGNI 
GIORNO NUOVE INIZIATIVE PER FACILITARE IL 
CONTINUO DIALOGO CON | PROPRI LETTORI. 
NATURALMENTE È IMPORTANTE CHE QUESTO 

SCAMBIO DI INFORMAZIONI SIA RESO IL PIÙ 
POSSIBILE AUTOMATICO E CHE | SUOI TEMPI SIANO 
SEMPRE PIÙ RISTRETTI. È CON QUESTO INTENTO CHE 

NASCE IL SERVIZIO LETTORI JACKSON, 
ORGANIZZATO IN MODO DA SODDISFARE OGNI 
ESIGENZA, SECONDO UN SISTEMA DI CEDOLE 
PRECONFIGURATE, DA INVIARE AL NOSTRO 
SERVIZIO MARKETING. ANZITUTTO, IL SERVIZIO 
LETTORI JACKSON CONSENTE DI SOTTOSCRIVERE 
ABBONAMENTI O ORDINARE LIBRI E GRANDI OPERE 
UTILIZZANDO LE CEDOLE QUI A FIANCO, 
SCEGLIENDO LA MODALITÀ DI PAGAMENTO 
PREFERITA. UN ESTRATTO CONDENSATO DEL 
CATALOGO LIBRI E GRANDI OPERE JACKSON È 
PUBBLICATO NELLE ULTIME PAGINE DI QUESTA 
RIVISTA; IL CATALOGO COMPLETO PUÒ ESSERE 


COMUNQUE ORDINATO, UTILIZZANDO LA CEDOLA 
NUMERO 3: INFORMAZIONI & AGGIORNAMENTI. 
QUEST'ULTIMA È LA PIÙ IMPORTANTE E PERMETTE AL 
LETTORE DI RICEVERE, DIRETTAMENTE A CASA 
PROPRIA, TUTTE LE INFORMAZIONI SULLE INIZIATIVE 
JACKSON CHE LO INTERESSANO: CATALOGHI, LIBRI, 
CAMPAGNA ABBONAMENTI CORSI DELLA 
DIVISIONE FORMAZIONE E PRODOTTI PER LA 
DIDATTICA JACKSON S.A.T.A., COPIE OMAGGIO DI 
RIVISTE E FASCICOLI DI GRANDI OPERE. QUESTO 
SERVIZIO CONSENTE, OLTRE CHE DI RIMANERE 
AGGIORNATI, ANCHE DI AGGIORNARE | COLLEGHI 


E GLI AMICI, POICHÈ LA CEDOLA È STUDIATA | 


ANCHE CON QUESTO INTENTO. NON PIÙ 
TELEFONATE E LETTERE: DA OGGI È SUFFICIENTE 
SPEDIRE L'APPOSITO TAGLIANDO, PER OTTENERE IN 
BREVISSIMO TEMPO IL MATERIALE DESIDERATO. 
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OLE ASI 


Se desiderate sottoscrivere abbonamenti alle riviste Jackson, utilizzate questa 
cartolina. Gli abbonati Jackson possono contare su un duplice risparmio (una 
tariffa privilegiata e la garanzia del prezzo bloccato per la durata del proprio 
abbonamento) e hanno diritto a uno sconto negli acquisti di libri. Ritagliate e 
predire: riportando sulla busta l'indirizzo esatto del Gruppo Editoriale 

ackson. 


RITAGLIATE E SPEDITE IN BUSTA CHIUSA 
MITTENTE 5 












i 
|| COGNOME 
I| noME 
| VIA E NUMERO GRUPPO EDITORIALE 
i CAP CITTÀ JACKSON 
Via Rosellini, 12 
PROV. TEL. ( ce 
Li PRO | 20124 Milano 
le mucoe tiatr 







I Se desiderate ordinare libri o “Grandi Opere Jackson”, utilizzate questa cedo- 
1 la. Compilate gli appositi spazi precisando anche il tipo di pagamento scelto, il 
vostro nome, cognome e indirizzo. Ritagliate e basata: riportando sulla bu- 


sta l'indirizzo esatto del Gruppo Editoriale Jackson. 
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COGNOME 
NOME 


VIA E NUMERO GRUPPO EDITORIALE 


JACKSON 


Via Rosellini, 12 
20124 Milano 


ea vie 


Se desiderate ricevere rapidamente informazioni sui prodotti e attività del 
Gruppo Editoriale Jackson o acquistare, con formula rateale a sole L. 25.000 
mele un anticipo di L. 45.000 una “Grande Opera Jackson”, barrate le ca- 
selle della cedola che vi interessano. Ritagliate e spedite, riportando sulla 
busta l'indirizzo esatto del Gruppo Editoriale Jackson. 


RITAGLIATE E SPEDITE IN BUSTA CHIUSA 
È 


COGNOME 


CAP CITTÀ 


PROV. TEL. ( 

















NOME 


VIA E NUMERO GRUPPO EDITORIALE 


JACKSON 


Via Rosellini, 12 
20124 Milano 


CITTÀ 





CAP 









PROV. TEL..( 


N.B. Per abbonamenti all'estero le tariffe dovranno essere raddoppiate. Non è prevista la spedizione via aerea. 


SCUOLA DI ALTE TECNOLOGIE 
APPLICATE JACKSON S.A.T.A. 


CALENDARIO CORSI 1988 


Lunedì 29 agosto Inizio corso SPECIALIZZAZIONE IN AUTOMAZIONE 
INDUSTRIALE E ROBOTICA 175 ore (serale) 

Inizio corso MICROPROCESSORI BASE 40 ore (serale) 

Lunedì 5 settembre 

Inizio corso CONTROLLO E PREVENZIONE DELLE PARTI ELETTRONICHE 
DALLE SCARICHE ELETTROSTATICHE 24 ore (intensivo) 

Inizio corso PROGRAMMAZIONE IN BASIC 40 ore (intensivo) 

Inizio corso UNIX, XENIX UTENTI 80 ore (serale) 

Inizio corso DBIII PLUS UTENTI 24 ore (serale) 

Lunedì 12 settembre 

Inizio corso EMC-COMPATIBILITA ELETTROMAGNETICA 24 ore (intensivo) 
Inizio corso PROGRAMMAZIONE IN PASCAL-TURBOPASCAL 50 ore 
(intensivo) 

Inizio corso CASE-COMPUTER AIDED SOFTWARE ENGINEERING 40 ore 
(intensivo) 

Giovedì 15 settembre 

Inizio corso DBIII PLUS PROGRAMMAZIONE 24 ore (serale) 

Lunedì 19 settembre 

inizio corso DESK TOP PUBLISHING 40 ore (serale) 

Inizio corso TRASDUTTORI, SENSORI, ATTUATORI 20 ore (serale) 
Mercoledì 21 settembre 

Inizio corso ELETTRONICA DIGITALE 60 ore (intensivo) 

Lunedì 26 settembre 

Inizio corso PROGRAMMAZIONE IN COBOL 60 ore (intensivo) 

Mercoledì 28 settembre 

Inizio corso CONTROLLORI LOGICI PROGRAMMABILI 40 ore (serale) 
Lunedì 3 ottobre Inizio corso ARCHITETTURA SNA 32 ore (intensivo) 
nizio corso INTEGRAZIONE EDP E TLC NELL'OFFICE AUTOMATION 32 ore 
(intensivo) 

Inizio corso APPLICAZIONI INDUSTRIALI DELLE TECNICHE LASER 

DI BASSA POTENZA 32 ore (intensivo) 

Inizio corso VENTURA 24 ore (intensivo) 

Lunedì 10 ottobre 

Inizio corso APPARATI E SISTEMI PER LE RETI DI COMPUTER 40 ore 
(intensivo) 

Inizio corso MICROPROCESSORI BASE 40 ore (intensivo) 

Inizio corso PAGE MAKER 24 ore (intensivo) 

Lunedì 17 ottobre Inizio corso PROGRAMMAZIONE IN C 80 ore (intensivo) 
Inizio corso PROGRAMMAZIONE WINDOWS BASE 80 ore (intensivo) 
Inizio corso PROCESSORI DI SEGNALE DIGITALE 60 ore (intensivo) 
Inizio corso MANUSCRIPT 24 ore (intensivo) 

Lunedì 24 ottobre Inizio corso ELEMENTI BASE DI ROBOTICA 20 ore (serale) 
Lunedì 7 novembre Inizio corso PC/MS-DOS 24 ore 

Inizio corso PIANIFICAZIONE RETICOLARE COL PC 24 ore (intensivo) 
Inizio corso OFFICE COMMUNICATION 24 ore (intensivo) 

Inizio corso INFOCENTER 32 ore (intensivo) 

Inizio corso TECNICHE BASE E SISTEMI PER TRASMISSIONI DATI 80 ore (serale) 
Inizio corso MICROPROCESSORI EVOLUTO 40 ore (serale) 

Inizio corso INTRODUZIONE ALL'INTELLIGENZA ARTIFICIALE E AI SISTEMI 
ESPERTI 40 ore (intensivo) 

Inizio corso INFORMIX/SOL 50 ore (serale) 

Inizio corso ARCHITETTURA O0S/2 40 ore (intensivo) 

Inizio corso MICROPROCESSORI A 16 BIT 60 ore (intensivo) 

Inizio corso AFFIDABILITÀ DEI CIRCUITI E DEI COMPONENTI ELETTRONICI 
24 ore (intensivo) 

Mercoledì 9 novembre Inizio corso WORD 24 ore 

Lunedi 14 novembre 

Inizio corso RETI DI COMUNICAZIONE NELLA FABBRICA AUTOMATIZZATA 
20 ore (serale) 

Inizio corso MODELLI PREVISIONALI COL PC 24 ore (intensivo) 

corso USO DEL PC NELL'AREA PRODUZIONE 24 ore (intensivo) 

tizio corso PROGETTAZIONE DEI MODERNI CIRCUITI STAMPATI 24 ore 
(intensivo) 

Lunedì 21 novembre 

Inizio corso RETI A COMMUTAZIONE DI PACCHETTO 40 ore (intensivo 
Inizio corso PROGRAMMAZIONE IN LISP 40 ore (intensivo) 

Inizio corso MODELLI DECISIONALI COL PC 24 ore (intensivo) 

Inizio corso USO DEL PC NELL'AREA MARKETING 24 ore (intensivo) 
Lunedì 28 novembre Inizio corso MULTIPLAN 24 ore 

Inizio corso PROGRAMMAZIONE IN PROLOG 40 ore (intensivo) 

Inizio corso AUTO-CAD 32 ore (serale) 

Inizio corso SERVIZI A VALORE AGGIUNTO SULLE RETI X25 24 ore 
(intensivo) 

Mercoledì 30 novembre Inizio corso LOTUS 1-2-3 24 ore 

Lunedì 12 dicembre 

Seminario con WORK-SHOP SUI LINGUAGGI DELLA IV GENERAZIONE 24 
ore (intensivo) 

Inizio corso IL MODELLO OSI 32 ore (intensivo) 

Inizio corso SYMPHONY 40 ore (intensivo) 

Inizio corso OTTIMIZZAZIONE E DEBUGGING “C" 40 ore (intensivo) 
Inizio corso MICROPROCESSORI EVOLUTO 40 ore (intensivo) 


z 


ATYILIVNO IWDIUNYN DI 


U 


DIOG 
DIUDg 


180 


YSsia O 
Addojy dd + suizoBoW MId 


Oxpas> ip DuDI 


] ip opodw | aspiigappo po ozzuoino IA [1] 
LVMO 


SMIN 030 


MIN V1.0 
1990 INOIZyYWOINV O 


31WNWWIL13S 1990 WDILWWYOJNI D 


] 


] quawpbod pi sag 
VIONISNAWOI OD 

IIVIW IO WISIAII VI O 

Y3SN 15300O8d ILL3ANO DI 
TWVNOISS34OYd ILOCOWWOI DI 


0351p UO) ZI 9 P9 IYOCOWWOIBIANS 


DUass0> UOD) GZ1 "9 P9 ZIOCOWWOIYIdNS 
1990 VIZISNONI O 


WIINOBLII73 3IV4 D 
1990 WIINOILLI7]3 O 


INIZVOWVW 1310301A D 


AWAY INOIZYIINNWODI1IL 3 ILVA INOISSIWSYIL O 


ua wunu 


ITYDISNW LLIN3WN81LS O 
INIZVOYW IBOM Dd DI 
1990 WIILWWYOAJNI 


DINABILI DYAP 0Ido3010) 0Bayo è 
INOIZWII iddW 9 VIIIVYO YILNdWOD CI 


OUDJIN - UOSYPO( 2pPuo ipa oddnuo D 0I0ISAIUI EOZI9III VU 
]!P oJUAwWwDSIAA 0JONHAY}{® OH [] 


— ‘7 IP ojuawDSISA 0/DNH®}{a OH [] 
A1Y318YNO 3NdOWOINY D 


DUJIY — 
SSIYdXI NWIIBIWW ( 


u ouBasso oBajy { 


IP asaL |Dp 9J91/039p DIAOP 0JUBWDUOGGO ] 


DZUIPpozs ip Dog TT 


DINA89L 0jjAP 0:d03010j 08a]jo è 02IJD162|a, 0 a|oisod 


ua unu 
4a unu 
s@ UNU 
ue wnu 
ua wnU 
ua wunu 
ua wunu 


O1IN3WVOWVd IA YLITVOOW 


8N15 SYINIO 


uewnu 
ua wnu 
uawnu 
uewnu 


1/P 


{| Hawnu 
ZI ua wnu 
O| Hawnu 
OL Hawnu 


Il 
Ll 


v 
v 
9 
9 
ov 
07 
07 
Ol 


9 
NOSYMI VI ILSIAIY ILN3NDIS I71V IWIVNOAAY OYICISIA IS 


IS VIIVDO 
a|jpjsod 2/2 jns 


000 lp 


vivo 
U 0JUOI 
L 
O 
90/po) 







DIUODg Djjap 


o4ipos> p Duo 
ajpisod Dijbna 


DO 


u ouBasso oBajy { 
MUNJOA G 3YWMILIOS 


IWunjoA Q| DINHDWwI0}u] è DIIUOLH3|J ip 0Ipadoj3:3u3z <-83 


DINA9IL DJjap DIdO2I010) 
HLVDNITIOLLOS IWNIOA | IWILVIANI IS 


Dado |jap cIUELIIABIIY |O 
062] è cuDJIVW ds uosypof ajpuonpz oddnue) D 04DISAIUI EOZI9ILI 


WAI DID IP OJSW1NU | 
}!p cuodui | cuusod jo 01ayBog 


WVWYld 
ONUNWIOI è (APUAIZO d]|D DIOAIASU DNWIOF) DINUDj D]jOP QUO!SSILUO | OPAINIY [] 
DSIA 








1!p cuewobod ji cJONH®}}® OH (7) 
Oz20)4 


nunjoa p 13/Ndw09 |puossad IGYY 


000791 7] unjoa Z DINDW0]u] è DHUOA4I]3Z !P 02104500 w DIPadojarruz 


000942 "1 


8861 0uBn18 op ‘dsip) iwnjoa 9 SILA@ 

(9A G WYDINOBLI313 IO OIBOLVYOGYVI 
"01 [PP DiuO3s Ojjo CHIP ipunb cy è 
uosg2D( Distiau ajuanbas ojo 0jpuOgqp cuos D 


]!P cuodwi | FJD JIGAPpo po OZZuono 14 { } 
031Y069|94 04YBoA 


$501dx3 UDDUSOWwY 
1/P 

2°] Ol DdP9/8Z12/P9D 1IHDIWIS IA VIONIS Y 
2495503 )Z + !VOIZ8] OZ OTDIA DISVBOICIA 
9495503 )Z + !VOIZ9] 07 PSNI/919 DISYVBOIZGIA 
Addoj QI + 1U0129] 0Z IdP9/8Z19/Y99 DISYBOIGIA 
2425502 )Z + !UOIZ8] OZ Ddb9/8719/P99 DISYVBOIGIA 
24955093 07 + !V0129] 0Z XSW DISWBOIGIA 


5592 QI + 29) Ol DdP9/8Z19/P9) VDIIVY9 IO OSÙOI 
495502 07 + !VOIZA] OZ WNYLIIdS DISVBOZGDIA 


U9SSOI G| + IuOIZO| GI DdP9/8Z1D/P9D 118 31ON Z 
23IPpo) 


IUNJOA (| DINDWIOU] è DIIUOIHD]IZ IP OLUDUOIZIO - 130 


DZzuUapo:s ip DIDp 


gp sauig 
$s05 OI + 


vo 


gg cubn:8 op -dsip 


1 
1 
1 
1 
1 
1 
1 


U 9|DISOG 3/3 |NS OJUBLUDSIBA 
uNOSMNOYf 38434O IONVYO,.. 1LN3NDIS I7 IWILVIANI IS 


ozzew o 





auoizipads ip asads 0551 0INQUIUOI 336 0O0S'£ ‘1 + 000°0£ ‘)] OwIvIU sUIpio 
OZ29)g 


IS 9UOD 
000°9£2 1 
000°94P 1 


Djjns 
000°9£% ‘1 
000'9£2 ‘1 
000'9S1 
000°96 
00096 
00091" 
000°921 
000921 
000°9Z1 
000°9Z1 ‘1 
000°941 
000°9£1 


lussi ke ce occ iunea RA 


O 
O 
O 
O 
O 
O 
O 
O 
O 
O 
O 
dO 
do 
do 
O 
O 


—_ “NOSMIVI 


1660s pido> pun asaAadlI 019 


oJapisag 
NOYSIY[ 249d0 Ipunso ajjap ajpaina 


pisog 


LAICI jjns 
NOSYIY[ SIsiali ajjns IUOIZDWLIOJUI GABILI 0ISPISA( 


U oJapisa 


==: Bfos 


BSDw siersdi 
| 219499 


IZDULIOJ QUO 
— 0186ps pido> pun a 


NOSYMDYf s4ado ipuna6 o6ojpyn3 ji asa/9dLI 0IApisa 


| UOI 


O|DJDI ji AJ9AGILI OJBPISA 


0|04DI | 


IZDULIOJUI DJDABILI 0Japisag D 


WIILVWI1IL !P 0U04D10gD] 
VIILYWYOANI !P 940401007] 
ITVIDIdS FIDOTONDIL ILTV D91W 


ITVIDIHILUV VZNIOITTILNI 3 VIILYVWYOANI D91V 
6 
6 


VIINOYLLITI !P 9U04D10GD7] 


NOILYWOLNYW 39I44O !P 004010 GD] 


[{'{e} 


Per le modalità di 
iscrizione e richiesta di 
programmi dettagliati, 
telefonare alla DIVISIONE 
FORMAZIONE E 
PRODOTTI PER LA 
DIDATTICA del Gruppo 
Editoriale Jackson 


Via Imperia 2 Mila 
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Conosci a fondo le applicazioni: CadiGam, 
istemi esperti, informatica musicale, coma 
. putergrafica. Impari a procedere nella pro- 
= grammazione e nei sistemi opèratimiacon 
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(5 PIÙ SPECIALIZZATI NEL SETTORE SONO NATE 


Iire 6.500 


LE GRANDI GUIDE AI COMMODORE 64 E 128. QUESTE SI PRESENTANO COME 


La Grande Guida 


RIFERIMENTI UFFICIALI PER DUE TRA | PIÙ VERSATILI E INTERESSANTI 


del Programmatore. 


COMPUTER ATTUALMENTE DISPONIBILI. COMMODORE 64 E 128 
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DI QUESTE GUIDE PER ESSERE USATI IN MANIERA 
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